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SUMMARY 


This  User's  Guide  describes  the  procedures  to  operate  the 
Air  Force  Aerospace  Medical  Research  Laboratory's  ( AFAMRL ) 
COMputerized  Biomechanical  MAN-model  (COMBIMAN)  programs.  The 
Guide  is  based  on  the  COMBIMAN  system  of  programs  as  of  1  May 
1981.  An  introduction  to  the  man-model  and  the  conventions 
used  to  develop  and  analyze  crew  station  configurations  are 
included  in  the  guide.  It  also  contains  the  operations  of  the 
programs  included  in  the  COMBIMAN  system.  These  programs 
include  the  interactive  graphics  program  CBM05  to  generate 
COMBIMAN,  and  the  three  key  file  creation/modification  programs 
CBMAM,  CBMCM ,  and  CBMVM ,  which  create  and  maintain  the  Data 
Bases  of  anthropometric  surveys,  crew  station  configurations, 
and  visibility  contour  definitions  respectively.  The  guide 
also  contains  a  complete  description  of  the  use  of  the  off-line 
plot  program,  CBMOFF.  The  first  four  programs  are  designed  to 
run  on  an  IBM  370  computer  and  CBMOFF  is  designed  to  run  on  a 
CDC  Computer. 

The  guide  to  operate  the  four  main  programs  includes 
descriptions  of  the  available  processing  for  each  program, 
definitions  and  examples  of  all  input  and  output  data  formats, 
procedures  to  load  the  programs,  and  explanations  of  all  diag¬ 
nostic  messages  generated  by  the  programs.  The  requirements  to 
run  CBM05  and  the  available  functions  on  the  COMBIMAN  are  also 
described  in  the  guide. 
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PREFACE 


This  work  was  pertormed  under  USAF  Contract  F33615-78-C- 
0507  entitled  Biomechanics  of  Cockpit  Evaluation.  The  govern¬ 
ment  work  unit  number  for  this  contract  is  71840824.  The  con¬ 
tract  monitor  and  technical  advisor  is  Dr.  Joe  W.  McDaniel  of 
the  Workload  and  Ergonomics  Branch  of  the  Air  Force  Aerospace 
Medical  Research  Laboratory.  The  development  of  the  programs 
referred  to  in  this  User's  Guide  was  performed  by  the  Univer¬ 
sity  of  Dayton  Research  Institute  (UDRI).  The  UDRI  Technical 
Report  number  for  this  Guide  is  UDR-TR-81-80 . 

The  purpose  of  this  report  is  to  provide  a  detailed  guide 
to  use  the  key  computer  programs  of  the  AFAMRL  COMBIMAN  sys¬ 
tem.  It  does  not  document  the  theoretical  approach  taken  in 
developing  any  of  the  computer  programs.  The  manipulation  of 
the  model  and  crew  station  is  straightforward  and  the  informa¬ 
tion  in  Section  2  will  enable  a  non-computer  person  to  run  the 
interactive  graphics  program  CBM05.  Because  of  the  technical 
nature  of  the  plot  program  described  in  Section  3,  and  the  data 
base  maintenance  programs  described  in  Sections  4,  5,  and  6, 
the  person  assigned  to  interpret  and  to  use  these  programs 
should  possess  some  experience  in  computer  programming.  Since 
all  the  programs  are  considered  relevant  to  the  COMBIMAN  sys¬ 
tem,  they  are  all  included  in  this  guide  for  sake  of  complete¬ 
ness.  The  description  of  the  man-model  and  crew  station  in  the 
introduction  are  presented  as  general  background  material  need¬ 
ed  to  use  the  programs  efficiently.  The  link-system  described 
in  the  introduction  is  based  on  research  originally  performed 
by  W.  T.  Dempster  of  the  University  of  Michigan.  Dr.  K.  W. 
Kennedy  of  AFAMRL/HEG  contributed  to  the  definition  of  the 
Anthropometric  Data  Base  and  provided  significant  improvements 
to  the  Dempster  man-model  link  systems. 
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SECTION  1 
INTRODUCTION 


During  the  design  and  analysis  phases  of  crew  station 
development,  it  is  essential  to  assess  the  inadequacies  and 
dangers  of  the  crew  station  environment  with  respect  to  the 
human  operator.  The  conventional  method  for  accomplishing  this 
has  been  to  build  mock-ups  and  use  an  undetermined  number  of 
"representative"  test  pilots  to  evaluate  the  work  environment 
and  control  placement.  The  mock-ups  tend  to  be  costly  and  time 
consuming  to  build,  as  well  as  somewhat  inflexible  during  test¬ 
ing.  The  sample  size  of  the  "representative"  pilots  depends  on 
the  availability  of  pilots  and  the  whims  of  the  designers. 

The  COMputerized  Biomechanical  MAN-model  (COMBIMAN)  system 
of  programs  has  been  developed  to  assist  in  the  design  and 
analysis  phases  of  crew  station  development.  It  has  been 
designed  to  serve  as  an  interactive-computer-graphics-assisted 
engineering  tool  to  represent  geometric  and  physical  properties 
of  a  person  at  a  crew  station.  It  has  applications  in  evaluat¬ 
ing  conceptual  or  existing  crew  stations.  The  COMBIMAN  is  a 
three-dimensional  man-model  and  can  be  viewed  from  any  plane  or 
angle.  Since  the  man-model  and  crew  station  exist  only  on  the 
Cathode  Ray  Tube  (CRT)  and  in  computer  memory,  no  significant 
amount  of  time  or  materials  are  invested  in  making  modifica¬ 
tions.  Alternative  designs  may  be  thoroughly  evaluated  and 
permanently  recorded  by  a  pictorial  plot  or  a  tabular  printout 
of  the  crew  station  data  and  man-model  (Joe  McDaniel,  1974). 
Because  of  these  capabilities,  the  COMBIMAN  should  reduce  or 
eliminate  the  need  for  building  mock-ups,  as  the  designer  can 
construct  a  crew  station  in  three  dimensions  on  a  CRT  and  can 
assess  interactions  using  man-models  of  various  body  sizes  and 
proportions . 
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1.1  MAN-MODEL  GENERATION 


The  man-model  used  in  COMBIMAN  is  based  on  a  35  link- 
sKeletal  system.  These  links  connect  major  points  of  rotation 
of  the  body  segments  as  shown  in  Figure  1.  The  lengths  of  the 
links  as  well  as  their  orientations  with  respect  to  their  ad¬ 
jacent  links  in  tne  skeletal  system  can  be  modified  by  the 
user.  Since  the  segment  lengths  or  link-lengths  are  generally 
internal  dimensions  and  are  difficult  to  measure  on  live  sub¬ 
jects,  the  link  lengths  are  derived  from  12  readily  measurable 
anthropometric  surface  dimensions.  The  sets  of  anthropometric 
variables  available  to  users  are  highly  correlated  to  mass  or 
length  of  body  segments.  A  more  detailed  description  of  these 
variables  is  given  in  Section  3.  Section  2  describes  the  ways 
the  user  can  change  the  proportions  of  the  man-model  by  speci¬ 
fying  new  values  tor  the  surface  dimensions. 

There  are  three  stages  in  generating  the  man-model.  In 
the  first  stage,  the  link  system  is  defined  ana  generated  using 
aata  available  from  tne  Anthropometric  Data  Base  and/or  from 
aata  supplied  by  the  user  (see  Figure  1) .  The  other  two  stages 
use  data  supplied  in  stage  one  ana  data  stored  in  the 
computer.  The  second  stage  places  enfleshment  ellipsoids  about 
the  link  system  joints  as  snown  in  Figure  2.  In  the  third 
stage,  the  ellipses  are  connnected  with  tangent  lines  to  define 
the  contour  of  the  man-model  (see  Figure  3).  The  user  does  not 
see  these  stages  of  model  development;  only  the  completed 
man-model  is  displayed. 

The  primary  viewing  planes  for  COMBIMAN  are  the  X-Z  plane 
(side  view) ,  the  X-Y  plane  (top  view)  and  the  Y-Z  plane  (front 
view)  .  The  man-model  need  not  be  parallel  to  any  one  of  these 
three  orthogonal  planes;  it  can  be  rotated  by  an  angle  with 
respect  to  these  planes.  Figures  1,  2,  and  3  show  COMBIMAN  in 
the  X-Z  plane  (side  view) . 
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Figure  1.  COMBIMAN  Link  System  -  Side  View. 
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Figure  2.  COMBIMAN  Link  System  with  Enfleshment  Ellipses. 
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Figure  3.  Enfleshed  COMBIMAN  with  Tangent  Lines. 
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1.2  CREW  STATION  DESIGN 


Crew  stations  to  be  designed  and  evaluated  using  the 
COMBIMAN  system  consist  of  panels  and  controls.  A  crew  station 
may  have  up  to  250  planar  panels  with  three  to  six  vertices  and 
150  controls  which  may  or  may  not  be  located  on  defined 
panels.  Although  the  crew  stations  used  in  COMBIMAN  are  usual¬ 
ly  aircraft  crew  stations,  it  is  possible  to  construct  and 
display  any  workspace  requiring  interaction  by  a  seated  opera¬ 
tor.  This  would  include  automobile  instrument  panels,  indus¬ 
trial  configurations,  and  control  panels  for  other  types  of 
vehicles . 

Two  methods  are  used  to  generate  and  display  crew  sta¬ 
tions.  The  designer  can  either  use  an  existing  or  conceptual 
configuration,  or  can  construct  a  new  one  on  the  Cathode  Ray 
Tube  using  the  available  interactive  graphic  options.  In  the 
first  method  panels  and  controls  for  existing  or  conceptual 
configuration,  are  coded  onto  computer  cards,  or  magnetic  tape, 
or  direct  access  disk,  and  are  entered  into  the  Crew  Station 
Data  Base.  These  data  are  accessed  by  the  user  through  the 
interactive  graphics  program.  In  the  second  method,  the  user 
can  design  crew  stations  on  the  CRT,  using  alphanumeric  key¬ 
board  and  the  program  function  keys,  following  the  basic  series 
of  steps  similar  to  those  used  on  a  drawing  board. 

A  crew  station  entered  into  the  program  exists  in  three 
dimensions  and  the  man-model  can  interact  with  it.  Since  the 
CRT  has  only  two  dimensions,  the  3-D  man-model  and  crew  station 
are  projected  on  the  screen  in  the  orientation  selected  by  the 
user.  The  display  can  then  be  rotated  within  the  Display  Area 
to  suit  the  designers'  needs.  An  example  of  the  display  with  a 
rotated  man-model  and  crew  station  are  shown  in  Figure  4.  Note 
that  the  Roll,  Pitch,  and  Yaw  angles  are  displayed  at  the  upper 
right  hand  corner  of  the  display  area. 
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Figure  4.  COMBIMAN  CRT  Display  with  Man-Model  and 

Simplified  Crew  Station  Rotated  OFF-AXIS. 
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1.3  EVALUATION  TECHNIQUES 


A  number  of  evaluation  techniques  have  been  implemented 
into  the  COMBIMAN  system.  They  are  designed  to  allow  the  user 
to  vary  the  proportions  of  the  man-model  to  suit  a  particular 
situation  or  problem,  and  to  position  the  man-model  within  the 
crew  station  to  assess  human  performance  and  to  aid  in 
placement  of  controls  and  panels. 

In  order  to  display  the  man-model  on  the  CRT,  the  COMBIMAN 
uses  data  from  on-line  disk  files  and  from  user  supplied  data 
on  anthropometric  surface  dimensions.  The  ability  to  make  use 
of  user  supplied  anthropometric  data  permits  the  construction 
of  man-models  of  variable  proprotions  suitable  to  the  partic¬ 
ular  needs  of  the  user.  To  define  the  man-model,  the  program 
CBM05  (COMBIMAN  program  Version  5)  requires  values  for  the  12 
anthrpometr ic  variables  to  generate  the  35  internal  link 
lengths.  The  user  can  either  supply  values  for  all  12  vari¬ 
ables  or  supply  values  for  one  mass-related  and  one  length- 
related  variable  and  let  the  program  compute  the  other  ten 
variables  using  multiple  regression  equations.  The  user 
supplied  data  may  be  (a)  direct  measures  obtained  from  specific 
subjects;  or  (b)  percentile  values  chosen  from  COMBIMAN  Anthro¬ 
pometric  Data  Base.  The  latter  option  is  generally  the  most 
useful,  as  it  limits  the  range  of  values  for  user  supplied  di¬ 
mensions  and  eliminates  unrealistic  combinations  of  dimen¬ 
sions.  The  program  CBM05  may  end  abnormally  when  unrealistic 
combinations  of  anthropometric  dimensions  are  supplied. 

The  man-model  can  be  positioned  in  a  crew  station  by  di¬ 
rectly  entering  sets  of  rotational  angles  used  to  position  the 
links  of  the  model,  or  with  the  PERFORM  REACH  ANALYSIS  function 
(see  Paragraph  2.2.11)  by  specifying  a  point  on  the  display. 
The  later  method  applies  to  reach  involving  the  arms  and  incor¬ 
porates  automatic  restrictions  to  mobility.  The  user  may  also 
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initialize  tne  man-moael  in  the  standard  anthropometric  seated 
measuring  posture  (ERECT  POSTURE),  the  SLUMPED  POSTURE,  which 
is  an  erect  posture  positioned  in  a  13  degree  seat  back  angle 
and  six  degree  seat  pan  angle,  or  a  third  posture  (PRGM'D 
PuSTURE)  interactively  designed  by  the  user. 

Other  information  available  to  the  user  includes  hard  copy 
plots  of  the  display,  printed  output  showing  the  three  dimen¬ 
sional  real  world  coordinates  of  the  man-model  and  of  the 
panels  of  the  crew  station,  ano  visibility  plots,  which  give 
the  user  information  on  the  visual  field  of  the  crew  station 
based  on  the  eye  position  of  the  man-model. 

1.4  THE  COMBIMAN  PROGRAMS 

The  COMBIMAN  system  is  divided  into  five  programs,  the 
main  program  being  the  interactive  graphics  program  CBM05, 
which  allows  the  user  to  generate  a  variable  size  man-model  and 
to  assess  its  interaction  with  new  or  existing  crew  stations. 
Before  the  user  can  define  the  proportions  of  the  man-model,  or 
call  up  crew  stations  and  visibility  contours  for  evaluation, 
the  tiles  which  store  the  anthropometric,  crew  station,  and 
visibility  memoer  data  must  be  created.  This  is  done  by  using 
three  specialized  file  creation/mooif ication  programs,  each 
dealing  with  a  particular  type  of  data  set:  anthropometric, 
crew  station,  or  visibility  member.  Similar  sets  of  commands 
are  used  by  each  program  to  initialize  the  file,  to  add  or 
delete  data,  to  write  existing  data  groups  to  the  printer,  or 
to  punch  data  groups  to  cards.  The  data  flow  of  the  COMBIMAN 
program  is  shown  in  Figure  5.  Figure  5  also  shows  a  fourth 
file,  the  initialization  data  set,  which  contains  data  usea  to 
construct  the  man-model  and  cannot  be  modified  by  the  user. 
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Figure  5.  Data  Flow  in  the  COMBIMAN  Program- 
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The  following  sections  explain  the  operation  of  five  key 
programs  of  the  COMBIMAN  system,  including  the  interactive 
graphics  program  CBM05,  the  off-line  plot  program  CBMOFF,  and 
three  of  the  file  manipulation  programs  which  maintain  the  data 
files  used  as  input  to  CBM05.  The  manipulation  of  the  man- 
model  and  crew  station  using  CBM05  is  straightforward.  Sec¬ 
tions  1  ana  2  of  this  guide  provides  a  designer  not  skillea  in 
computer  programming  with  sufficient  information  to  use  CBM05 
interactively.  Due  to  the  technical  nature  of  the  data  and 

operations  described  in  Sections  3,  4,  5,  and  6  some  computer 

skill  is  required  to  interpret  and  use  these  programs. 

Section  2  aescribes  the  use  of  the  program  function  keys 
which  may  be  activated  by  the  user  in  program  CBM05  to  manipu¬ 
late  the  man-model  and  to  design  and  evaluate  crew  stations. 
This  section  includes  examples  of  optional  as  well  as  standard 
output  formats  supplied  by  the  program,  and  lists  possible 
error  or  information  messages  generated  by  the  program. 

Section  3  aescribes  the  COMBIMAN  off-line  plotting  pro¬ 
gram,  CBMOFF.  This  program  uses  data  generated  by  CBM05  to 

proauce  plots  of  variable  size,  color,  and  content  from  the 

thr ee-aimensional  coordinate  data.  Input  formats,  plotting 
options,  ana  program  output  are  explained  in  this  section. 

The  program  which  creates  ana  maintains  the  Data  Base 
containing  the  Anthropometric  surveys,  CBMAM,  is  documented  in 
Section  4.  The  types  of  stored  data,  the  sources  for  such 

data,  and  the  formats  tor  data  input,  sample  output,  and  action 
ana  error  messages  are  discussed.  The  uses  of,  and  formats 
for,  the  commands  or  functions  which  manipulate  the  file  as 
well  as  the  data  are  also  described. 
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The  program  which  creates  and  maintains  the  Data  Base 
containing  the  geometric  descriptions  of  crew  station  configu¬ 
rations,  CBMCM ,  is  documented  in  Section  5.  The  program  which 
creates  and  maintains  the  Data  Base  of  geometric  descriptions 
of  crew  stations  tor  visibility  plots,  CBMVM,  is  documented  in 
Section  6.  Data  sources  and  formats  for  input,  output,  and 
messages  are  also  described  tor  both  programs.  In  addition, 
these  sections  contain  examples  of  Job  Control  cards  to  run 
these  programs. 
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SECTION  2 

T HE  COMBIMAN  INTERACTIVE  GRAPHICS  PROGRAM 
VERSION  5  -  CBM05 


At  the  heart  of  the  COMBIMAN  system  is  the  fifth  version 
of  the  COMBIMAN  interactive  graphics  program  CBM05.  The  program 
uses  an  IBM  2250-3  Display  Unit  for  designing  and  analyzing 
crew  station  configurations.  The  user  at  the  display  device 
controls  the  course  of  execution  of  program  CBM05  using  a 
Program  Function  Keyboard,  ,a  light  pen,  and  an  alphanumeric 
keyboard.  Functions  of  the  program  are  executed  by  depressing 
lighted  Program  Function  Keys.  This  section  describes  the 
functions  available  to  the  COMBIMAN  user,  shows  the  output 
these  functions  generate,  and  traces  through  suggested  execu¬ 
tion  sequences  to  generate  the  man-model,  and  to  retrieve  a 
crew  station. 


2.1  INTRODUCTION 

The  graphics  program  CBM05  enables  the  designer  to  bring 
together  the  information  on  anthropometry  and  crew  stations 
stored  on  disk  (see  Sections  4  and  5)  and  to  combine  them  with 
the  interactive  qualities  of  the  Cathode  Ray  Tube.  This  en¬ 
ables  one  to  evaluate  real-life  conditions,  or  to  establish 
design  criteria  for  new  situations  in  a  fraction  of  the  time  it 
would  take  using  conventional  methods. 

For  design  and  evaluation  sequences,  the  12-inch  square 
CRT  screen  is  partitioned  into  Prompting,  Information,  and 
Display  areas  (see  Figure  b)  .  The  Prompting  Area  displays 
messages  indicating  what  the  user  should  do  next.  This  area  is 
also  used  to  accept  replies  through  alphanumeric  keyboard  when 


PROMPTING  AREA 

INFORMATION  AREA 

10"  x  10" 

DISPLAY  AREA 


Figure  6.  Format  of  IBM  2250-3  Display  Unit. 

The  program  adjusts  the  size  of  the 
displayed  image  to  fill  the  10"  x  10" 
display  area.  Selecting  a  front  view 
may  cause  the  man-model  and  crew  station 
to  appear  larger,  but  the  coordinate 
information  remains  unchanged. 
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requested.  The  Information  Area  displays  the  anthropometric 
survey  name,  the  crew  station  name,  flight  suit  and  helmet 
types,  seat  type  ana  offset,  mobility,  and  posture  informa¬ 
tion.  Tne  10-inch  square  Display  Area  is  used  to  display  the 
man-model,  crew  station  and  roll,  pitch  and  yaw  angles,  if 
different  from  zero.  The  three  dimensional  coordinates  of  the 
reach  point  during  Reach  Analysis,  the  coordinates  of  the 
current  vertex  auring  a  panel  aesign,  and  the  visibility  member 
names  during  Visibility  Plot  Functions  are  also  displayed  in 
the  Display  Area. 

Replies  to  prompting  messages  are  given  through  the  Alpha¬ 
numeric  KeyDoard  (ANKB)  ,  the  Light  Pen,  or  the  Programmable 
Function  Keys  (PFK) .  Replies  given  through  ANKB  are  displayed 
in  tne  Prompting  Area  below  prompting  message  and  are  processed 
by  the  program  after  simultaneously  depressing  the  ALT  CODING 
key  and  the  "5"  key.-*-  A  light  pen  reply  is  given  by  aiming 
the  light  pen  beam  at  the  desired  response  displayed  on  the 
CRT,  ana  depressing  the  light  pen  barrel  against  the  screen. 

Figure  7  shows  an  IBM  2250-3  CRT  in  use.  The  user's  left 
hand  is  on  the  Program  Function  Keyboard,  and  his  right  hand  is 
using  the  light  pen  to  identify  a  point  on  the  screen.  The 
Alphanumeric  Keyboard  is  shown  below  the  CRT. 


lln  subsequent  use  in  the  text  the  simultaneous  depression  of 
the  "ALT-CODING"  ana  "5"  keys  will  be  referred  to  as  the 
ALT-CODE/5  sequence.  IBM  refers  to  this  sequence  as  EOB 
(End  of  Block).  (IBM  System  Reference  Library,  Program 
Numbers  360S-LM-537 . ) 
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Figure  7.  CRT  Unit  with  Function  Keys,  Alphanumeric  Keyboard  and  Light  Pen. 


2.1.1  Available  Functions 


The  functions  which  are  available  to  users  fall 
into  six  basic  categories,  as  shown  in  Figure  8.  The  first 
category,  the  Anthropometry  Related  functions,  enables  the  user 
to  retrieve  data  for  a  particular  anthropometric  survey  from 
the  Anthropometric  Data  Base,  specify  values  for  the  surface 
dimensions  of  the  man-model,  and  manipulate  the  geometry  of  the 
model  to  achieve  the  desired  man-model  configuration.  The  Crew 
Station-Related  functions  allow  the  user  to  retrieve  existing 
three-dimensional  crew  station  configurations  from  the  Crew 
Station  Data  Base  and  then  add  to  and  modify  the  retrieved 
configuration.  These  functions  allow  users  to  start  from  the 
beginning  of  a  design  sequence  and  create  a  new  crew  station 
configuration.  The  Display-Related  functions  allow  users  to 
rotate  and  to  magnify  the  contents  of  the  display  area.  They 
also  enable  users  to  identify  objects  within  the  Display  Area, 
or  modify  the  contents  by  omitting  or  by  including  objects. 
The  user  can  evaluate  the  interaction  of  man-model  with  crew 
station  through  the  Man-Machine  Interaction  Related  functions. 
These  functions  provide  users  with  a  reach  analysis  routine  and 
change  posture  functions.  The  Printer/plotter  Related  func¬ 
tions  supply  users  with  hardcopy  output  of  the  configuration  of 
either  the  man-model  or  the  crew  station.  The  program  gen¬ 
erates  plot  output  as  soon  as  a  plot  function  is  activated,  but 
the  printed  output  occurs  only  at  the  end  of  the  run.  The 
final  category,  the  Program  Execution  Related  functions,  per¬ 
mits  the  user  to  restart  the  program,  or  to  end  it.  It  also 
enables  the  user  to  set  State  Switches  which  either  suppress  or 
activate  additional  processing  or  printing. 

A  standard  feature  of  the  program  is  a  listing  of 
all  actions  taken  by  the  user.  This  listing  is  a  sequence  of 
messages  printed  at  the  termination  of  the  program  CBM05. 
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2.1.2  Requirements 


At  the  Wr ight-Patterson  Air  Force  Base,  AFAMRL 
HESS  facility,  the  program  CBM05  runs  on  an  IBM  370/155  Operat¬ 
ing  System  Computer  using  an  IBM  2250-3  graphics  display  ter¬ 
minal  with  light  pen,  alphanumeric  keyboard,  and  program  func¬ 
tion  keyboard,  and  an  on-line  Gould  5000  potter.  The  program 
requires  550K  bytes  computer  memory  and  a  minimum  of  20K  bytes 
graphics  buffer  control  area.  The  Initialization,  Anthropo¬ 
metric,  Crew  Station  and  Visibility  Data  Bases  reside  on  a  disk 
drive  in  a  direct  access  format.  The  space  requirement  for 
each  data  base  depends  on  the  number  of  members  and  their  com¬ 
plexities.  IBM  System/360  Operating  System  Graphic  Subroutine 
Package  (GSP)  for  FORTRAN  IV  is  used  to  create  displays  on  the 
CRT.  Gould  4800/5000  IBM  System/360/370  Plot  package  is  used 
for  on-line  plotting. 

Other  requirements  for  specific  functions  are  de¬ 
scribed  in  the  appropriate  paragraphs  which  follow. 


2.2  AVAILABLE  PROCESSING 

Functions  of  Program  CBM05  are  requested  by  means  of  the 
Program  Function  Keyboard.  This  keyboard  consists  of  32  keys, 
numbered  0  to  31,  whose  functions  are  assigned  by  program 
CBM05.  When  a  function  is  enabled,  the  appropriate  button  on 
the  PFK  will  be  lighted.  The  primary  functions  for  Program 
CBM05  are  shown  on  the  PFK  Overlay  Mask  in  Figure  9.  The 
circles  in  Figure  9  represent  the  PFKs.  Their  numbers  are 
shown  above  and  to  the  left  of  each  circle.  The  numbers  within 
the  circles  represent  the  subsections  where  the  functions  are 
described.  For  example,  PFK0  contains  a  "1"  within  the  circle 
and  is  described  in  Paragraph  2.2.1.  A  function  is  requested 
by  a  single,  momentary  depression  of  the  corresponding  PFK. 
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IBM  PART  NO.  5704496 


RETRIEVE  RETRIEVE  VISIBILITY  OFF-LINE  ON-LINE  PRINT 

ANTHROPOMETRY  CREW  STATION  PLOT  PLOT  PLOT  DATA 


.PERFORM  INPUT  12  INPUT  2 _ DISPLAY  _ DUMP 

REACH  ANTH.  DIM  INDEP.  VBL'S  TABLE  CRT 


■DESIGN.  _  _ DELEH 

PANEL  PANEL 


CHANGE  SLUMPFD  ERECT  PROGRAMMED  RESET  SEAT 

PERSPECTIVE  POSTURE  POSTURE  POSTURE  R-P-Y  ADJUST 


_  STATE  RESTART  END 

ZOOM  SWITCH  CBM05  CBM05 


HUM 


Figure  9.  Program  Function  Keyboard  (PFK)  Overlay  for 
Program  CBM05. 
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Once  the  program  is  loaded  (for  instructions  on  loading, 
see  Paragraph  2.3.1)  the  prompting  area  of  the  screen  will 
display  the  message  "DEPRESS  PFK4  TO  SELECT  ANTH  DATA".  The 
first  sequence  of  steps  the  user  follows  should  utilize  Anthro¬ 
pometry  Related  functions  to  generate  the  man-model.  The 
mandatory  sequence  is  shown  in  Figure  10.  The  number  in  each 
block  refers  to  the  paragraph  which  describes  the  function. 

After  the  man-model  is  generated  and  displayed  on  the  CRT, 
the  user  may  choose  to  manipulate  the  man-model  using  the 
Display-Related  functions,  or  may  retrieve  or  develop  a  crew 
station  using  the  Crew  Station  Related  functions.  (Should  be 
selected  before  deleting  panels.)  The  Program  Execution  Relat¬ 
ed  functions  (see  Figure  8)  are  always  enabled  and  may  be 
depressed  at  any  time  during  the  execution  of  CBM05. 

The  following  paragraphs  describe  the  processing  performed 
by  each  function  as  numbered  in  Figure  9. 
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Figure  10 . 


Function  Sequence  for  Generating  the 
Man-Model . 
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2.2.1  CHANGE  VIEW  Function  (PFKO) 


The  CHANGE  VIEW  function  allows  users  to  rotate 
the  man-model  and  the  crew  station  in  the  display  area  of  the 
screen  as  shown  in  Figure  6. 

Once  this  function  key  is  selected,  the  program 
prompts  the  user  to  select  either  a  new  view-plane  for  the 
display  area,  or  to  define  a  new  off-axis  orientation  of  the 
man-model  ana  crew  station.  To  change  the  view-plane,  the  user 
responds  to  the  message  "L.P.  VIEW  CHANGE"  by  light  penning 
"XY"  tor  a  top  view,  "XZ"  tor  a  side  view,  or  "YZ"  for  a  front 
view  of  the  man-model  and  crew  station.  Then  the  program 
regenerates  the  aisplay  in  the  new  view-plane.  Figures  11,  12, 

and  13  show  the  aisplay  of  COMBIMAN  in  the  A7E-01  cockpit  in 
the  XY  (top),  XZ  (side),  ana  YZ  (front)  view-planes  respec¬ 
tively  . 


If  the  user  responds  to  the  message  "L.P.  VIEW 

CHANGE"  by  light  penning  "OFF-AXIS"  in  tne  upper-right  corner 
of  the  screen,  the  program  prompts  users  to  enter  the  new 
roll,  pitch,  and  yaw  angles.  Angles  are  specified  from  the 

ANKB  in  degrees  by  typing  the  value  and  following  the  ALT- 

CODE/5  sequence.  The  aefault  value,  0  degree  for  these  angles, 
is  entered  by  simply  depressing  the  ALT-CODE/5  sequence.  The 
following  sequence  of  replies  rotates  the  man-model  and  crew 

station  of  Figure  12  to  ROLL  =  10  degree,  PITCH  =  0  degree,  and 
yaw  =  -15  degree. 


10 

ALT-CODE/5 

ALT-CODE/5 

-15 

ALT-CODE/5 


(Change  ROLL  to  10  degree) 
(Enter  ROLL  =  +10  degree) 
(Enter  PITCH  =  0  degree) 
(Change  YAW  to  -15  degree) 
(Enter  YAW  =  -15  degree) 


Once  the  ALT-CODE/5  sequence  for  the  YAW  angle  is 
enterea,  the  display  will  be  rotated. 
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Figure  11. 


Top  View  (X-Y  Plane)  of  the  Man-Model  and 
a  Crew  Station. 
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Figure  12.  Side  View  (X-Z  Plane)  of  the  Man-Model 
and  a  Crew  Station. 
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Figure  13. 


Front  View  (Y-Z  Plane)  of  the  Man-Model 
and  a  Crew  Station. 
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2.2.2 


IDENTIFY  OBJECT  Function  (PFK1) 


The  IDENTIFY  OBJECT  function  displays  identifying 
information  in  the  Information  Area  of  the  CRT  for  any  object 
(man-moael  skeletal  link  or  crew  station  panel)  chosen  by  the 
user.  After  aepressing  PFK1 ,  the  message  "LIGHT-PEN  OBJECT" 
appears  in  the  Prompting  Area  of  the  CRT.  The  user  must  then 
light-pen  the  object  to  be  identified. 

The  following  three  pieces  of  information  for  the 
light-penned  object  are  displayed  in  the  Information  Area: 

1)  The  internal  reference  number  of  the  object, 

2)  Reference  coordinates  for  that  object,  and 

3)  The  8-character  name  of  the  object. 

The  internal  reference  number  is  a  unique  integer,  assigned  by 
the  program,  which  identifies  each  link  or  panel.  The  refer¬ 
ence  coordinates  for  the  object  are  the  X,  Y,  and  Z  coordinates 
of  the  distal  end  point  for  man-model  link  or  the  X,  Y,  and  Z 
coordinates  of  the  first  vertex  (as  defined  in  Crew  Station 
Data  Base  -  see  Section  5)  for  selected  panel.  The  8-character 
name  of  the  object  is  either  the  link  name  (see  Table  3)  or  the 
name  of  tne  panel  as  it  exists  in  the  Crew  Station  Data  Base. 
Figure  14  shows  the  result  of  an  IDENTIFY  OBJECT  function 
performed  on  the  HUD  (heads  up  display)  in  the  A7E-01  crew 
station.  The  information  displayed  in  the  Information  Area  of 
the  CRT, 


62  22.09  3.74  32.26  HUDSCRN 

indicates  that  its  internal  reference  number  is  62,  the  coordi¬ 
nates  of  its  first  vertex  are  X  =  22.09,  Y  =  3.74,  and  Z  = 
32.26,  and  its  name  is  HUDSCRN. 
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Figure  14 .  The  IDENTIFY  OBJECT  Function  Performed  on  the 
HUDSCRN  (Heads  Up  Display)  of  the  A7E-01  Crew 
Station. 
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The  message  "CBM010I  IDENTIFIED  link/panel  name" 
along  with  distal  end  coordinates  ot  the  identified  link  or 
coordinates  ot  all  vertices  of  the  identified  panel  are  printed 
on  the  message  unit. 
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2.2.3  OMIT  OBJECT  Function  (PFK2 ) 


The  OMIT  OBJECT  function  temporarily  removes  a 
crew  station  panel  or  a  man-model  segment  from  the  display. 
This  function  is  used  to  "de-clutter"  the  display. 

On  depressing  PFK2,  the  message  "LIGHT-PEN  OBJECT" 
appears  in  the  Prompting  Area  of  the  CRT.  The  user  must  then 
light-pen  the  object  to  be  omitted.  The  program  then  displays 
the  internal  reference  number  of  the  object,  the  X,  Y,  and  Z 
coordinates  of  the  distal-end  point  of  the  selected  man-model 
link  or  the  X,  Y,  and  Z  coordinates  of  the  first  vertex  of  the 
selected  panel,  and  the  8-character  name  of  the  object  in  the 
Information  Area  of  the  CRT.  The  internal  reference  number  of 
the  object  is  a  unique  integer,  assigned  by  the  program,  which 
identifies  each  link  and  panel.  It  is  the  same  number  that  the 
IDENTIFY  OBJECT,  function  displays  and  must  be  supplied  by  the 
user  it  the  INCLUDE  OBJECT  function  (see  Paragraph  2.2.4)  is 
used  to  redisplay  the  omitted  object.  The  user  may  write  down 
these  numbers  for  future  reference.  Any  omitted  object  can  be 
redisplayed  by  supplying  its  internal  reference  number  while 
performing  INCLUDE  OBJECT  function.  Also,  all  omitted  objects 
are  redisplayed  whenever  the  man-model  and  crew  station  are 
regenerated  (e.g.  during  a  CHANGE  VIEW  function  or  a  function 
whicn  involves  use  of  the  cross  symbol) .  Figure  15  shows  the 
message  created  by  OMIT  OBJECT  function  when  heads  up  display 
screen  (HUDSCRN)  of  A7E-01  crew  station  is  light-penned  and 
Figure  lb  shows  the  display  with  the  HUDSCRN  omitted.  Note 
that  the  message  generated  by  OMIT  OBJECT  function  on  CRT 
display  is  identical  to  that  of  IDENTIFY  OBJECT  function. 

The  message  "CBM011I  OMITTED  link/panel  name"  and 
distal  end  coordinates  of  the  omitted  link  or  coordinates  of 
all  vertices  of  the  omitted  panel  are  printed  on  the  message 
unit. 
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Figure  15.  The  OMIT  OBJECT  Function  Performed  on 
the  HUDSCRN  (Heads  Up  Display)  of  the 
A7E-01  Crew  Station  (Name  of  Light 
Penned  Object  is  Displayed) . 
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Figure  16.  The  OMIT  OBJECT  Function  Performed  on 
the  HUDSCRN  (Heads  Up  Display)  of  the 
A7E-01  Crew  Station. 
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2.2.4 


INCLUDE  OBJECT  Function  ( PFK3 ) 


The  INCLUDE  OBJECT  function  redisplays  an  object 
that  was  removed  from  display  screen  by  OMIT  OBJECT  function. 
After  depressing  PFK3,  the  message  "ENTER  OBJECT  NUMBER" 
appears  in  the  Prompting  Area  of  the  CRT.  The  number  is  entered 
through  ANKB  followed  by  ALT-CODE/5  sequence.  The  only  valid 
entries  for  this  function  are  internal  reference  numbers  of 
man-model  skeletal  links  or  crew  station  panels  which  have  pre¬ 
viously  been  deleted  by  OMIT  OBJECT  function.  The  program  will 
keep  prompting  for  a  valid  internal  key  number  until  the  user 
supplies  one  or  enters  the  ALT-CODE/5  sequence  to  ignore  the 
function  and  return  to  the  main  program.  There  are  no  other 
messages  associated  with  this  function.  Depressing  PFK3  and 
entering  key  number  62  (HUDSCRN  reference  number)  for  the 
INCLUDE  OBJECT  function  with  Figure  16  would  cause  the  heads  up 
display  screen  to  reappear  in  its  original  position  in  the  crew 
station.  The  man-model  and  crew  station  display  will  once 
again  look  like  tnat  of  Figure  15. 
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2.2.5 


RETRIEVE  ANTHROPOMETRY  Function  (PFK4 ) 


This  function  is  the  first  step  in  defining  the 
size  of  the  man-model.  The  user  is  first  prompted  to  light-pen 
the  name  of  a  "regression  member"  from  the  Anthropometric  Data 
Base.  (A  detailed  explanation  of  regression  and  survey  members 
is  given  in  Section  4.)  Regression  member names  are  displayed 
in  the  column  headed  "REGRESSION  MEMBER",  as  shown  in  Figure 
17.  To  choose  the  1967  Survey  of  the  USAF  Flying  Personnel, 
the  user  must  light-pen  R67  USAF;  and  to  choose  the  1970  Survey 
of  U.S.  Army  Aviators  the  user  must  light-pen  R70  ARMY*.  Once 
a  member name  is  light-penned,  the  message  "MEMBER  member  name 
ACCEPTED"  is  displayed  in  the  information  area  of  the  screen. 

After  the  regression  data  are  retrieved  from  the 
Data  Base,  the  user  must  light-pen  a  Survey  member  name  dis¬ 
played  on  the  CRT  which  corresponds  to  the  selected  regression 
displayed  in  the  column  headed  "SURVEY  MEMBER",  as  shown  in 
Figure  18.  (For  each  regression  member  only  one  survey  member 
is  supplied  in  this  version.)  While  the  message  "MEMBER 
member name  ACCEPTED"  is  displayed  in  the  Information  Area,  the 
means,  standard  deviations,  and  percentiles  for  the  anthropo¬ 
metric  dimensions  are  retrieved  from  the  Data  Base. 

Tne  message  "DEPRESS  PFK  12  OR  13"  then  appears 
in  the  Prompting  Area  of  the  CRT.  Here  the  user  selects  the 
anthropometric  surface  dimensions  or  internal  link  lengths 
vital  to  the  generation  of  the  man-model.  The  sequence  of 
steps  associated  with  these  function  keys  is  described  in  Para¬ 
graphs  2.2.12  and  2.2.13. 


*NOTE:  Other  sets  of  survey  data  will  be  available  in  future 

updates  of  COMBIMAN  or  the  user  may  create  new  members 
using  the  COMBIMAN  Anthropometric  Data  Base  Maintenance 
program  (CBMAM) . 
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L . P  REGRESSION  MEMBER 


REGRESSION  MEMBER 

Ril  US AF 
R  it  ATM 
Rig  AF*F 
RIO  ARMY 

Ran  navy 


Figure  17.  Table  of  Available  Regression  Member 
Names  -  One  Member  Must  Be  Selected 
by  Light  Penning. 


53 


L  ,P  ,  SURVEF  NAME 
MEMBER  Rtl  USAf  ACCEPTED 

luBvEr  MEMBER 
bl  US  AF 


Figure  18.  Table  of  Survey  Member  Name  (for  Regression 
Member  R67  USAF)  One  Member  Must  Be  Selected 
by  Light  Penning. 
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While  the  computations  using  the  anthropometric 
data  are  in  progress,  the  message  "HUMAN  ASSEMBLY"  is  displayed 
in  the  Intormation  Area  of  the  CRT.  After  this,  the  informa¬ 
tion  is  assembled  for  display  and  the  message  "CREATING 
DISPLAY"  is  displayed  in  the  Information  Area  and  the  new  man- 
model  (and  crew  station  if  one  was  previously  cued)  appears  on 
the  screen. 
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2.2.6 


RETRIEVE  CREW  STATION  Function  (PFK5 ) 


The  RETRIEVE  CREW  STATION  function  allows  the 
user  to  retrieve  a  crew  station  from  the  Crew  Station  Data 
Base.  After  PFK5  is  depressed,  the  user  is  prompted  to  light- 
pen  a  crew  station.  The  crew  station  membernames  are  shown  in 
Figure  19.  The  crew  stations  without  seats  are  listed  in  the 
first  column,  and  the  seats  are  listed  in  the  second  column. 
The  third  column  contains  "*ERASE*"  and  "*NONE*".  If  a  crew 
station  name  is  light-penned  without  erasing  the  previous  crew 
station,  both  crew  stations  are  superimposed  in  the  display. 
It  " *NONE* "  is  light-penned,  the  RETRIEVE  CREW  STATION  function 
is  cancelled. 


In  order  to  erase  all  existing  crew  stations 
from  the  display  area,  depress  PFK5  and  light-pen  "*ERASE*"  and 
" *NONE*"  in  that  order.  When  intentionally  superimposing  two 
or  more  crew  stations,  if  the  total  number  of  panels  exceeds 
250,  an  overflow  condition  exists,  and  the  message  "TOO  MANY 
PANELS/VERTICES  *  RETRY"  appears  in  the  Prompting  Area  of  the 
CRT.  The  program  then  redisplays  the  crew  station  membernames 
as  shown  in  Figure  20.  The  user  may  light-pen  "*NONE*"  to 
cancel  the  last  entry  and  relieve  the  overflow  condition. 
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L.P.  CRCM  STATION 


CREW  STATION  MEMBER 


YAHMCPG 

Al— SEAT 

•ERASE* 

PAVLO 

AIO-SEAT 

# 

C  tSO/PIC 

BI--SEAT 

•NONE* 

C  ISO/NAV 

SAC-SEAT 

F-IU 

Aie-oi 

YAH-SEAT 

Uh/  IN 

B l-NAVOI 

CM-5J 

DESK 

• 

saclmo) 

A-IOA 

YAHA4PG 

Figure  19 .  Table  of  Available  Crew  Station  Membernames . 

Only  A7E-01  is  included  in  the  Crew  Station 
Data  Base  released  with  the  COMBIMAN  system. 
The  user  must  add  other  crew  stations. 
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L  P.  CREW  STATION 
TOO  MANY  PANELS/  VERTICES  ARETRY 


CRE*  STATION 

MEMBER 

YAHfcMCPG 

A1--SEAT 

♦ERASE* 

P  AVLO 

AIO-SEAT 

C130/PIC 

BI--SEAT 

*N0NE» 

C  tSO/NAV 

SAC-SEAT 

F-HA 

AIE-Ot 

UH/  IN 

6t-NAV01 

CH-55 

DESK 

SACLMO) 

A  -  1 OA 

YAHAAPG 

YAM-SEAT 

Figure  20.  Table  of  Available  Crew  Station  Member  Name 
Displayed  When  the  Total  Number  of  Panels 
Exceeds  250. 
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2.2.7 


VISIBILITY  PLOT  Function  ( PFK6 ) 


The  VISIBILITY  PLOT  function  plots  a  map  of  vis¬ 
ual  azimuth  and  elevation  line-of-sight  angles  to  crew  station 
components  in  the  Visibility  Data  Base,  as  defined  in  MIL-STD- 
850,  Rectilinear  Plot.  However,  the  plot  of  visual  angles  re¬ 
flects  the  current  orientation  of  the  man-model  within  the  crew 
station  and  the  way  the  crew  members  would  see  the  crew  sta¬ 
tion  from  their  viewpoint.  After  depressing  PFK6  the  message 
"ENTER  EYE  LOCATION  (LINK  NUMBER)"  appears  in  the  Prompting 
Area  of  the  CRT.  The  user  must  select,  as  illustrated  in  Fig¬ 
ure  21,  the  reference  eye  point  to  be  used  for  the  plot  by  en¬ 
tering  "8"  for  Mid-Eye,  "9"  for  Right  Eye,  or  "10"  for  Left  Eye 
using  the  ANKB  and  following  the  ALT-CODE/5  sequence.  Now  the 
available  visibility  members  are  displayed  in  a  column  under 
the  heading  "VISIBILITY  MEMBER"  as  shown  in  Figure  22.  The 
user  then  light  pens  the  desired  visibility  member  and  the  mes¬ 
sage  "PLOTTING"  is  displayed  in  the  Information  Area  of  the  CRT 
and  the  plot  is  generated  on  the  GOULD  plotter.  The  routine 
which  performs  this  plotting  uses  the  coordinates  which  define 
the  vector  from  the  mid-head  position  to  mid-eye  position  (link 
8)  to  calculate  the  angular  orientation  of  the  head  from  the 
horizontal  and  vertical  directions.  If  the  man-model  is  facing 
forward  and  looking  straight  ahead,  the  orientation  of  his  head 
would  be  0  degree  from  horizontal  and  0  degree  from  vertical. 

Figure  23  shows  a  sample  visibility  plot  of  a 
canopy  clearline  for  a  single  seat  aircraft.  For  this  example, 
we  chose  the  man-model  to  be  50th  percentile  weight  and  sitting 
height  from  the  1967  USAF  Survey,  seated  erect,  and  looking 
straight  ahead. 
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Figure  21.  VISIBILITY  PLOT  Function. 

Location  Link  Number. 


Enter  Eye 
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Figure  22. 


VISIBILITY  PLOT  Function. 
Member. 


Select  Visibility 


CREWMEMBERS  HEAD  IS  POINTING  0° FROM  FORWARD  AND  0° FROM  HORIZONTAL 
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Figure  23.  Visibility  Plot. 


The  four  ellipses  superimposed  on  the  plot  define 
the  limits  of  various  visual  fields.  The  innermost  field,  de¬ 
fined  with  letter  S,  is  the  field  of  stereovision,  which  is  the 
field  visible  to  both  eyes  simultaneously.  The  field  defined 
with  letter  F,  is  the  field  of  fixation,  the  region  the  eyes 
can  see  directly  without  turning  the  head.  The  field  defined 
with  letter  P,  is  the  field  of  peripheral  vision  with  the  eyes 
caged  with  respect  to  the  head.  The  outermost  field,  defined 
with  letter  M,  is  the  maximum  peripheral  vision  limits  for 
extreme  eye  deviations.  The  symbol  "0"  is  the  aim  point  of  the 
head  (and  eyes  if  the  eyes  are  caged  forward  with  respect  to 
the  head).  The  vision  limits  are  generated  with  respect  to  the 
angle  of  sight  from  the  Mid-Eye  point  (end  point  of  link  8). 

In  addition  to  generating  a  hard  copy  plot,  if 
state  switch  20  is  set  "ON"  (see  Table  4)  the  routine  also  cal¬ 
culates  and  prints  a  listing  of  the  three  dimensional  coordi¬ 
nate  of  the  objects  plotted  in  five  degree  azimuth  increments 
from  -180  degrees  from  horizontal  line  of  sight  to  +180  degrees 
for  each  panel  and/or  contour  in  the  visibility  member.  This 
listing  is  a  handy  reference  to  the  crew  station  drawings.  The 
coordinates  are  given  in  the  original  user-supplied  system  of 
coordinates  rather  than  the  Neutral  Seat  Reference  Point  (NSRP) 
system  of  coordinates  used  elsewhere  (see  Paragraph  5. 3. 2.1). 
The  listing  also  gives  the  coordinates  of  the  eye  location  of 
the  man-model.  Figure  24  shows  a  part  of  the  coordinate  data 
for  the  plot  in  Figure  23. 
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Figure  24.  Canopy  Outline  Coordinates  in  Aircraft 
System. 
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2.2.8 


OFF-LINE  PLOT  COMBI  MAN  Function  ( PFK7 ) 


The  OFF-LINE  PLOT  COMBIMAN  function  saves  the 
coordinate  data  of  the  man-model  and  crew  station  currently 
displayed  for  later  use  to  generate  an  off-line  plot.  The 
prompting  and  informational  messages  for  this  function  and  the 
necessary  replies  are  identical  to  those  for  the  ON-LINE  PLOT 
COMBIMAN  function  described  in  Paragraph  2.2.9. 

After  depressing  the  OFF-LINE  PLOT  function  key 
(PFK7)  the  message  "PERSPECTIVE  PLOT?  ENTER  Y/N"  is  displayed 
in  the  Prompting  Area  shown  in  see  Figure  25.  Here  the  user 
has  the  option  to  select  a  perspective  or  nonperspective  plot. 
A  perspective  plot  shows  the  man-model  and  crew  station  with 
infinite  perspective  (as  displayed  on  the  CRT).  Nonperspective 
plot  does  not  show  any  perspective.  The  user  must  type  "Y"  or 
"YES"  for  a  perspective  plot,  or  "N"  or  "NO"  for  a  nonperspec¬ 
tive  plot  using  the  ANKB,  and  must  perform  the  ALT-CODE/5 
sequence . 


The  program  then  displays  the  message  "ENTER  PLOT 
SCALE  FACTOR"  in  the  Prompting  Area  of  the  CRT.  For  a  perspec¬ 
tive  plot,  a  scale  factor  of  1.0  produces  a  10  x  10  inch  plot 
identical  to  the  size  of  the  Display  Area  on  the  CRT.  For  a 
nonperspective  plot,  the  scale  factor  is  applied  to  full-scale 
data.  The  user  must  consider  the  size  restrictions  of  the 
available  plotter  when  specifying  the  scale  factor.  For  ex¬ 
ample,  a  1.0  scale  perspective  plot  is  about  the  same  size  as  a 
0.10  scale  nonperspective  plot. 

To  enter  the  scale  factor,  the  decimal  value  is 
typed  using  the  ANKB  as  shown  in  Figure  26  and  is  followed  by 
the  ALT-CODE/5  sequence.  When  a  valid  scale  factor  (greater 
than  0.0)  is  entered,  the  message  "PLOTTING"  appears  in  the 
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Figure  25 . 


The  Message  and  a  Response  for  the  COMBIMAN 
PLOT  Function. 


66 


Figure  26 . 


ON-LINE  PLOT  Function*  Enter  Plot  Scale  Factor. 
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Information  Area  of  the  CRT  as  shown  in  Figure  27  and  the  data 
are  written  to  a  disk  file  for  later  use  as  described  in  Sec¬ 
tion  3. 
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Figure  27.  ON-LINE  PLOT  Function.  Message  "PLOTTING" 

Displayed  When  Plotting  is  Done  on  the  GOULD 
Plotter . 
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2.2.9 


ON-LINE  PLOT  COMBIMAN  Function  (PFK8 ) 


The  ON-LINE  PLOT  COMBIMAN  function  generates  on¬ 
line  plots  of  the  man-model  and  crew  station  configuration  cur¬ 
rently  shown  in  the  Display  Area  of  the  screen.  After  depress¬ 
ing  the  ON-LINE  PLOT  function  key  ( PFK8 ) ,  the  user  has  the  op¬ 
tion  of  selecting  a  perspective  or  a  nonperspective  plot  (see 
Paragraph  2.2.8).  The  program  displays  the  message 
"PERSPECTIVE  PLOT?  ENTER  Y/N"  in  the  Prompting  Area  of  the 
CRT.  The  user  must  respond  "Y"  or  "YES"  for  a  perspective 
plot/  or  "N"  or  "NO"  for  a  nonperspective  plot,  from  the  ANKB 
( see  Figure  25 )  . 

The  program  then  displays  the  message  "ENTER  PLOT 
SCALE  FACTOR"  in  the  Prompting  Area  of  the  CRT  (see  Paragraph 
2.2.8).  To  enter  the  scale  factor,  the  decimal  value  is  typed 
using  the  ANKB  and  is  followed  by  the  ALT-CODE/5  sequence  (see 
Figure  26).  When  a  valid  scale  factor  (greater  than  0.0)  is 
entered  the  program  displays  the  message  "PLOTTING"  in  the  In¬ 
formation  Area  of  the  CRT  (see  Figure  27),  and  a  hard  copy  plot 
is  generated.  Note  that  the  scale  factor  is  applied  to  the 
display  image  size  for  perspective  plots,  and  to  the  full  scale 
coordinates  for  nonperspective  plots.  A  sample  on-line  per¬ 
spective  plot  is  shown  in  Figure  28. 
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Figure  28.  ON-LINE  PLOT  Function.  A  Sample  Perspective  On  Line  Plot 


2.2.10 


PRINT  DATA  Function  (PFK9 ) 


The  PRINT  DATA  function  prints  man-model  and  crew 
station  data.  The  man-model  data  consist  of,  for  each  link, 
the  X,  Y,  and  Z  coordinates  of  the  distal  end  of  each  link,  the 
transformation  angles  for  each  link,  and  the  enfleshment  semi¬ 
axes  lengths. 


Data  for  the  displayed  crew  station  panels  con¬ 
sist  of  the  name,  type,  and  X,  Y,  and  Z  coordinates  of  all  the 
vertices.  The  coordinates  of  each  control  on  the  displayed 
crew  station  together  with  its  name  and  name  of  the  panel  it  is 
located  on,  if  any,  are  also  printed.  An  example  of  the  output 
generated  by  the  PRINT  DATA  function  is  shown  in  Figure  29. 
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Figure  29.  Output  for  COMBIMAN  PRINT  Function. 


2.2.11  PERFORM  REACH  ANALYSIS  Function  (PFKll) 


The  PERFORM  REACH  ANALYSIS  function  causes  the 
man-model  to  attempt  an  arm  reach  to  a  selected  point  in  space. 

First,  the  program  prompts  the  user  to  light-pen 
REACH  MOBILITY:  ARM,  LAP,  or  SHOULDER  as  shown  in  Figure  30. 

ARM  mobility  allows  only  arm  movement  while  the  shoulder  and 
torso  remain  fixed.  LAP  mobility  allows  arm,  shoulder,  and 
torso  movement.  SHOULDER  mobility  allows  arm  and  shoulder 
movement  while  the  torso  remains  fixed.  After  the  reach  mobil¬ 
ity  has  been  selected  the  program  prompts  the  user  to  light-pen 
the  REACH  TYPE  (see  Figure  31).  There  are  two  reach  types, 
right  arm  (RARM)  and  left  arm  (LARM).  After  the  reach  type  has 
been  selected,  the  program  prompts  the  user  to  light-pen  the 
EXTENT  OF  REACH.  There  are  three  choices:  grip  center 

(GRIPCTR)  which  indicates  a  grasping  motion  such  as  for  a  con¬ 
trol  stick,  functional  (FUNCTRCH)  which  indicates  a  pinching 
motion  such  as  for  turning  a  knob,  and  finger  tip  (FNGRTP) 
which  indicates  a  touching  motion,  such  as  for  a  push  button 
(see  Figure  32).  Figure  (1)  shows  the  relative  locations  of 
these  points  on  the  hand.  The  shape  of  the  hand  on  the  man- 
model  remains  the  same  regardless  of  which  grip  type  is  select¬ 
ed.  Once  the  extent  of  reach  type  has  been  selected,  the  pro¬ 
gram  displays  the  man-model/crew  station  configuration  in  the 
X-Z  plane  (side  view)  in  a  nonperspective  view  (see  Paragraph 
2.2.8).  The  program  then  pompts  the  user  to  position  the  cross 
symbol  ("+")  at  the  point  to  be  reached  within  the  display 
area.  The  program  uses  a  slewable  "+"  to  locate  and  designate 
the  3-D  coordinates  of  points  of  interest  on  the  displayed 
image . 
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Figure  30. 


PERFORM  REACH  ANALYSIS  Function. 
First  message  "L.P.  MOBILITY". 
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Figure  31.  PERFORM  REACH  ANALYSIS  Function  Light  Pen 
Reach  Type . 
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POSTURE 


REACH  ANALYSIS  L  P  EXTENT  0F  REACH 

GRIPCTR  FNCTRCH  FNGRTP 

REGRESS  R  bT  USAF  SURVEY  bT  USAF  CRST  ATE-0  1 
PLIGHT  SUIT  NONE  HELMET  TYPE  NONE 

SEAT  TYPE  HARD  OFF(  0.0  0.0  0.0  )  SLUMPED 


RPY  f 


L  ARM 

XY  X2  Y2 

MOBILITY 

OFF-AXIS 

lap 

16  ,©J 

Figure  32. 


PERFORM  REACH  ANALYSIS  Function  Light  Pen 
Extent  of  Reach. 
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2.2.11.1  Positioning  the  Cross  Symbol  "+" 

Initially,  the  program  displays  a  cross 
symbol  ("+")  at  the  seat  reference  point  (SRP)  as  shown  in  Fig¬ 
ure  33.  The  user  must  first  position  the  "+"  in  the  X-Z  plane 
(side  view)  to  define  the  X  and  Z  coordinates,  and  then  in  the 
Y-Z  plane  (front  view)  to  define  the  Y-coordinate  of  the  reach 
point.  Note  that  the  Z-coordinate  can  be  redefined  while  posi¬ 
tioning  the  cross  in  the  Y-Z  plane.  Figures  34  and  35  show  the 
man-model  in  X-Z  and  Y-Z  planes  respectively  with  the  "+"  at  a 
point  to  be  reached  on  the  instrument  panel.  The  "+"  is  pre¬ 
cisely  positioned  on  a  point  using  the  Program  Function  Key¬ 
board  as  described  in  the  following  paragraphs. 

The  PFKs  are  temporarily  redefined  as 
shown  in  Figure  36.  The  direction  and  magnitude  of  movement  of 
"  +  "  on  the  screen  when  these  PFKs  are  depressed  are  indicated 
inside  the  circles  representing  the  PFKs  in  the  figure.  By 
selecting  the  proper  PFK,  the  "+"  can  be  moved  up,  down,  left, 
right,  or  combinations  of  these,  at  two  different  speeds.  For 
example,  depressing  PFK7  causes  the  "+"  to  move  up  and  right  in 
one  inch  increments  at  a  rate  of  approximately  25  steps  per 
second . 


Once  in  motion,  the  direction  and/or 
magnitude  of  movement  of  the  cross  can  be  changed  simply  by 
depressing  another  directional  PFK.  The  motion  may  be  stopped 
by  depressing  the  STOP/RECORD  key  (PFK12)  once,  or  depressing 
the  SINGLE  STEP  ON  key  (PFK26) .  After  depressing  the  STOP  key, 
motion  can  be  continued  by  selecting  any  other  key.  As  soon  as 
the  cross  is  near  the  desired  point,  depress  the  SINGLE  STEP  ON 
key  (PFK26) .  This  stops  automatic  motion  of  the  cross,  allows 
the  cross  to  be  moved  in  single  steps  of  0.1  or  1.0  inch  each 
time  a  directional  key  is  depressed.  In  this  way,  the  cross 
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REACH  ANALYSIS 

POSITION  REACH  POINT 

REGRESS  R41  USAF  SURVEY  Li  USAF  CRST  A1E-01 


L  ARM 

fngrtp 


VIEW 

*r  *2  y 2 


plight  suit  none  ► 
seat  type  hard  OF F I 


helmet  type  none 

OFF<  0,0  0.0  0  0  ) 


POSTURE  MOBILITY  0^-AXlS 
SLUMPED  LAP 


Figure  33. 


Positioning  Cross  Symbol  "+"  Initially  the 
Cross  Symbol  is  Displayed  at  the  SRP. 
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Figure  34.  Side  View  (X-Z  Plane)  -  the  "+"  Symbol 
Locates  the  Reach  Point.  The  X  and  Z 
Coordinates  are  Defined  in  this  View 
Note  the  Coordinates  Displayed  in  the 
Upper-Left  Hand  Display  Area. 
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Figure  35 . 


Front  View  (Y-Z  Plane) .  The  "Cross" 
is  Used  to  Define  the  Y  Coordinate. 
Coordinate  May  Also  be  Redefined  in 


Symbol 
The  Z 

this  View. 
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W  W  W  W  W  - 

IBM  PART  NO.  5704496 


LEFT  1.0"  UP  1.0"  RIGHT  1.0 


STOP  / 


LEFT  0.1"  LEFT  1.0"  RECORD  RIGHT  1.0"  RIGHT  0.1" 


DOWN  AND  _  DOWN  AND 


LEFT  1.0"  DOWN  1.0"  RIGHT  1.0" 


Figure  36 .  Redefined  Program  FUNCTION  Keys  for  Positioning 
the  "+"  Symbol. 
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may  be  positioned  precisely  by  (1)  monitoring  the  position  of 
the  cross  relative  to  the  displayed  image,  or  (2)  monitoring 
the  X,  Y,  Z  Coordinate  Readout  (see  Figure  34)  which  appears  in 
the  upper-left  part  of  the  Display  Area  when  this  function  is 
in  progress.  This  latter  method  is  to  be  used  when  the  coordi¬ 
nates  of  the  point  are  known.  Note  that  these  coordinates  are 
in  the  beat  Reference  Point  coordinate  system.  Also  note  that 
this  is  different  from  the  NSRP  (Neutral  Seat  Reference  Point) 
coordinate  system  used  to  displace  the  seat  in  the  SEAT  ADJUST 
function. 


To  locate  and  enter  a  3-D  coordinate 


set  proceed  as  follows: 

•  Wnen  the  "  +  "  is  to  be  used  to  locate  a  point,  the 
display  automatically  transitions  to  a  side  view  (XZ 
plane) . 

•  Move  the  cross  to  the  desired  location  in  the  side 
view  by  the  method  described  above. 

•  Depress  the  STOP/RECORD  key  (PFK12)  twice  in  succes¬ 
sion  to  enter  the  X  coordiante. 

•  The  display  automatically  transitions  to  a  front  view 
(YZ  plane) . 

•  Use  the  left  or  right  direction  keys  to  position  the 
cross  in  the  Y  direction. 

NOTE:  If  the  cross  is  moved  up  or  down,  the  Z  coordinate  is 

redefined . 


•  Depress  the  STOP/RECORD  key  (PFK12)  twice  in  succes¬ 
sion  to  enter  the  Y  and  Z  coordinates. 

•  The  display  automatically  transitions  to  the  orienta¬ 
tion  in  use  at  the  time  the  PERFORM  REACH  function 
was  activated. 
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Now  the  PFKs  are  reset  to  their  origi¬ 
nal  definition  and  the  man-model  begins  to  reach  toward  the 
specified  point  in  three  to  six  discrete  steps.  When  the  reach 
is  successful,  "REACH  SUCCESSFUL"  is  displayed  in  the  Informa¬ 
tion  Area  of  the  display  as  shown  in  Figure  37.  If  the  man- 
model  could  not  reach  the  point,  the  message  "MISS  DISTANCE" 
and  the  miss  distance  value  in  inches  are  displayed  in  the 
Information  Area  of  the  CRT  display  as  shown  in  Figure  38. 

2.2.11.2  Post  Reach  Processing 

Following  the  reach,  the  user  must 
light-pen  the  response  "YES"  or  "NO"  displayed  below  the 
prompting  message  "PRINT  REACH  DATA?  L.P.  YES  OR  NO"  (see 
Figures  37  or  38).  If  the  user's  response  is  "YES",  a  summary 
of  the  reach  analysis  as  shown  in  Figure  39  is  printed  out. 
There  will  be  no  printed  output  if  the  user  light  pens  "NO". 

The  message  "CONTINUE  REACH?  L.P.  YES 
OR  NO"  is  then  displayed  in  the  Prompting  Area  of  the  CRT 
screen.  If  the  user  wants  to  continue  the  reach  analysis  with 
the  same  arm  or  have  a  two  arm  reach,  the  light-pen  response 
must  be  "YES"  .  In  this  case  the  program  restarts  the  reach 
routine  and  prompts  the  user  to  light-pen  the  reach  type  (see 
Paragraph  2.2.11).  If  the  user  desires  a  two  arm  reach,  "LARM" 
must  be  light-penned  if  the  first  choice  was  "RARM"  and  vice 
versa.  When  a  two  arm  reach  is  executed,  the  first  reach  de¬ 
termines  the  position  of  the  shoulder  and  trunk.  The  reach  by 
the  other  arm  is  an  "ARM  ONLY"  type  of  reach,  with  no  shoulder 
or  trunk  movement.  If  the  user  light-pens  "NO"  the  program 
progresses  to  display  the  next  message  "RESET  POSTURE?  L.  P. 
YES  OR  NO".  If  the  user  light-pens  "YES"  the  program  resets 
the  man-model  to  the  posture  before  the  reach  attempt.  If  the 
user  light-pens  "NO"  the  man-model  remains  in  the  reaching 
posture.  At  this  point  the  reach  routine  returns  control  to 
the  main  program. 
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REACH  ANALYSIS  "‘ACM  °*TA?  ,Ka  ""  v|t„ 

YES  NO  REACH  „y  tJ  yj 

REGRESS  RH  USAF  SURVEY  ,  El  USAF  CRST  AlE-OI  SUCCESSFUL 

FLIGHT  SUIT;  NONE  HELMET  TYPE  NONE  POSTURE  MOBILITY  OFF-AXIS 

SEAT  TYPE  HARD  0 FF(  0.0  00  0  0  )  SLUMPED  LAP 


VIEM 
XY  XZ  YZ 


REACH  POINT  RPY (  0.0.  -15.0.  15.0) 

X  Y  Z 

2*1.10  1.00  21.00 


Figure  37. 


REACH  SUCCESSFUL  is  Displayed  after  the 
Reach  is  Successfully  Performed. 
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Figure  38.  MISS  DISTANCE  is  Displayed  if  the  Man- 
Model  Could  Not  Reach  the  Point. 
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2.2.12 


INPUT  12  ANTHROPOMETRIC  DIMENSIONS  Function 


(PFK12) 


This  is  one  of  two  methods  to  define  the  bodysize 
of  the  man-model.  The  other  method  is  described  in  Paragraph 
2.2.13.  The  INPUT  12  ANTHROPOMETRIC  DIMENSIONS  function  allows 
the  user  to  supply  values,  either  as  percentiles  or  as  absolute 
dimensions,  for  each  of  the  dependent  anthropometric  variables 
necessary  to  construct  the  link  system  of  the  man-model.  This 
function  can  be  selected  by  depressing  PFK12. 

There  are  basically  three  methods  for  entering 
anthropometry  using  this  function:  (1)  in  engineering  units 

with  card  input,  (2)  in  engineering  units  through  the  ANKB ,  or 
(3)  by  selecting  a  percentile  for  each  variable  from  a  menu  on 
the  display. 


1)  If  State  Switch  22  is  previously  set  "ON"  , 
the  message  "CARD  INPUT  ANTH .DIM.?  ENTER  Y/N"  is  displayed  in 
the  Prompting  Area  of  the  CRT.  If  the  answer  is  "YES"  or  "Y" 
through  the  ANKB,  the  12  dependent  anthropometric  dimensions 
are  read  ,  in  the  default  units  of  measure ,  from  input  cards  in 
the  format  shown  in  Figure  40.  The  function  then  returns  con¬ 
trol  to  the  main  routine  to  generate  the  man-model.  If  the 
response  is  "NO"  or  "N"  ,  or  simply  the  ALT-CODE/5  sequence,  or 
if  State  Switch  22  is  not  set  "ON"  the  program  bypasses  the 
card  input  option. 

2)  When  the  card  input  option  is  bypassed  ,  the 
message  "VALUES  IN  PCTLS?  ENTER  Y/N"  is  displayed  in  the 
Prompting  Area  of  the  CRT.  If  the  response  through  the  ANKB  is 
"NO"  or  "N"  to  this  message,  the  user  is  then  prompted  to  enter 
a  value  in  engineering  units  for  each  of  the  12  dependent  vari¬ 
ables.  The  procedure  is  as  follows: 
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•  The  message  "DESIRE  CHANGE  UNIT?  ENTER  Y/N" 
will  be  displayed.  The  user  types  "YES"  or 
"Y"  and  follows  the  ALT/CODE-5  sequence  to 
change  the  units  for  each  variable.  If  the 
response  is  "NO"  or  "N"  followed  by 
ALT/CODE-5  sequence,  or  simply  ALT/CODE-5 
sequence,  the  default  units  are  assumed. 


NOTE:  While  value  may  be  entered  in  any  units  of  measure, 

they  are  converted  to  pounds  or  inches  for  processing, 
display,  and  printouts. 


•  The  first  variable  name  is  then  underlined. 

-  If  the  response  to  the  above  prompting 
message  is  "YES"  as  shown  in  Figure  41 
then  the  message  "L.P.  NEW  UNIT,  IF 
DESIRED"  is  displayed  as  shown  in  Figure 
42.  The  user  may  light  pen  a  new  unit 
from  the  menu  of  allowable  units  (rrif  cm, 
mm,  lb,  or  k£) ,  or  perform  ALT-CODE/5 
sequence  to  retain  the  default  unit  for 
that  variable.  Then  the  message  "ENTER 
NEW  VALUE"  appears  in  the  Prompting  Area 
as  shown  in  Figure  43.  The  process 
repeats  for  each  variable  (see  Figure  44). 

-  If  the  response  to  the  prompting  message 
"DESIRE  UNIT  CHANGE?  ENTER  Y/N"  is  "NO", 
the  message  "ENTER  NEW  VALUE"  immediately 
appears  in  the  Prompting  Area  of  the  CRT. 

•  The  user  types  in  the  numeric  quantity  in 
the  appropriate  units  followed  by  the 
ALT-CODE/5  sequence.  The  process  then 
repeats  as  each  of  the  12  dependent  variable 
names  is  underlined.  Control  is  then 
returned  to  the  main  routine  for  man-model 
generation. 


NOTE:  Since  the  unit  of  measurement  is  declared  for  each 

number  entered,  the  numbers  need  not  be  in  the  same 
units,  that  is,  inches,  centimeters,  and  milli¬ 
meters;  and  pounds  and  kilograms.  These  units  may 
be  mixed  as  desired.  Alternatively,  since  pounds 
and  inches  are  the  default  units  of  measure,  the 
user  may  select  these  by  using  the  ALT-CODE/5 
sequence  rather  than  using  the  light  pen. 
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DESIRE  CHANGE  UNIT?  ENTER  Y/N 

Y. 

MEMBER  41  USAE  ACCEPTED 


AVBL 

AVBL 

DEPENDENT  VBLS  1 

JNIT  INPUT 

UNI  TS 

PCTL 

•EIGHT 

LB 

IN 

1 

2 

SITTING  HEIGHT 

IN 

CH 

y 

s 

10 

ACROMION  HGT/SIT 

IN 

MM 

KNEE  hgt/sitting 

IN 

LB 

IS 

20 

buttock-kne  lgth 

IN 

KG 

25 

SO 

shouldr-elb  lgth 

IN 

S5 

BIACROMIAL  brdth 

IN 

RO 

R5 

hip  BREADTH 

IN 

SO 

ss 

40 

chest  depth 

IN 

EOOT  LENGTH 

IN 

45 

10 

hand  length 

IN 

IS 

•  0 
ts 

10 

is 

ELiOt *KR 1ST  LGTh 

IN 

11 

It 

11 


Figure  41.  INPUT  12  ANTHROPOMETRIC  DIMENSIONS  Function 
Option  to  Change  Input  Unit  When  Entering 
Values  in  Engineering  Units. 
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L.P.  NEM  UNIT.  IF  DESIRE 
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Figure  42. 


INPUT  12  ANTHROPOMETRIC  DIMENSIONS  Function 
Choose  New  Unit  for  Input  Value. 
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Figure  43.  INPUT  12  ANTHROPOMETRIC  DIMENSIONS  Function 
Sample  Input  in  Engineering  Unit. 
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Figure  44.  INPUT  12  ANTHROPOMETRIC  DIMENSIONS  Function 
Choose  New  Unit,  if  Necessary,  for  the  Next 
Input  Variable. 
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3)  If  the  card  input  option  is  bypassed  and  the 
user  responds  "YES"  or  "Y"  or  simply  ALT-CODE/5  to  the  prompt¬ 
ing  message  "VALUE  IN  PCTLS?  ENTER  Y/N" ,  (see  Figure  45)  values 
are  entered  for  each  of  the  12  dependent  variables  as  a  percen¬ 
tile  of  the  survey  chosen  in  the  first  step  of  the  Define  An¬ 
thropometry  function  as  follows. 


•  The  first  variable  name  is  underlined  and 
the  user  receives  the  prompt  "L.P. 

PERCENTILE" . 

•  The  user  then  light  pens  the  desired 
percentile  from  the  menu  of  available 
percentiles  on  the  right  side  of  the  Display 
Area.  The  above  procedure  is  repeated  for 
each  of  the  12  dependent  variables.  Figure 
46  shows  the  Display  after  defining  the 
first  two  variables.  Control  then  returns 

to  the  main  program  for  man-model  generation. 
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Figure  45.  INPUT  12  ANTHROPOMETRIC  DIMENSIONS  Function 
Option  to  Choose  Input  Values  in  Percentile 
or  in  Engineering  Units. 
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Figure  46.  Light  Pen  Percentile  Values  for  the  INPUT  12 
ANTHROPOMETRIC  DIMENSIONS  Functions.  The 
first  two  values  have  been  defined  in  per¬ 
centiles;  the  third  value  is  underlined, 
indicating  its  value  will  be  defined  by  the 
next  selected  percentile  value. 
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2.2.13 


INPUT  TWO  INDEPENDENT  VARIABLES  Function  (PFK13) 


This  is  one  of  two  methods  to  define  the  size  of 
the  man-model,  the  other  method  is  described  in  Paragraph 
2.2.12. 


The  INPUT  TWO  INDEPENDENT  VARIABLES  function  pro¬ 
vides  the  user  with  the  opportunity  to  select  two  relevant  an¬ 
thropometric  variables  and  to  enter  their  values.  One  of  these 
variables  is  highly  correlated  to  the  mass  variables  of  the 
man-moael,  and  the  other  is  highly  correlated  to  the  length 
variables.  One  of  the  advantages  of  using  this  function  is 
that  the  user  need  not  specify  values  for  all  12  dependent  an¬ 
thropometric  dimensions,  as  with  PFK12  (Paragraph  2.2.12). 
Instead,  the  user  selects  two  key  variables  most  relevant  to 
the  design  or  evaluation  problem.  The  program  will  calculate 
values  for  the  remaining  dependent  variables  using  regression 
equations.  Values  supplied  by  the  user  can  be  either  in  per¬ 
centiles  of  the  selected  anthropometric  survey  member,  or  in 
engineering  units. 

After  depressing  PFK13,  the  CRT  is  formatted  as 
shown  in  Figure  47.  The  left  and  center  portions  of  the  screen 
contain  the  columns  of  mass  and  length  related  variables,  re¬ 
spectively.  To  the  right  of  each  variable  name  is  the  default 
or  pre-defineo  unit  of  measurement.  The  right  portion  of  the 
screen  contains  a  column  of  alternative  units  of  measurement, 
labeled  " AVBL  UNITS",  and  a  column  of  percentile  names,  labeled 
" AVBL  PCTL " ,  for  which  values  can  be  obtained  from  the  selected 
survey  member. 


The  program  places  realistic  constraints  on  the 
second  variable,  so  the  variable  chosen  first  must  be  the  most 
important  one.  For  example,  if  the  length  dimension  is  more 
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Figure  47. 


INPUT  TWO  INDEPENDENT  VARIABLES  Function  Input 
New  Z  Score  (Default  Value  is  1.65). 
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important  than  the  weight,  a  length  related  variable  must  be 
selected  first.  Based  on  the  value  of  the  first  entry,  the 
second  entry  is  constrained  within  a  certain  range  as  displayed 
in  the  information  area  of  Figure  51.  This  range  is  set  at  + 
1.65  standard  deviations  from  the  best  estimate  derived  from 
the  first  value  entered.  This  range  can  be  redefined  by  the 
user  as  follows: 

The  first  prompting  message  is  "ENTER  NEW  Z- 
SCORE"  as  shown  in  Figure  47.  This  Z-score''-  value  is  used  in 
the  equation  which  calculates  the  range  of  permissible  values 
tor  the  second  independent  variable  selected.  If  the  default 
value  of  1.65  is  retained,  the  permissible  range  will  include 
approximately  90%  of  all  possible  values  for  the  second 
variable.  Increasing  the  Z-score  will  increase  the  range  and 
decreasing  the  Z-score  will  decrease  the  range.  The  value  the 
user  types  in  must  fall  between  -3.0  and  +3.0.  If  the  default 
value  of  1.65  is  suitable,  the  user  may  respond  by  performing 
the  ALT-CODE/5  sequence.  Otherwise,  type  the  new  value  and 
enter  it  by  the  ALT-CODE/5  sequence. 

The  next  message  is  "VALUES  IN  PCTLS?  ENTER  Y/N" 
(see  Figure  48)  .  If  the  user's  response  is  "YES"  or  "Y"  or 
just  the  ALT-CODE/5  sequence,  values  will  be  input  by  light- 
penning  percentiles  from  the  column  "AVBL  PCTL" .  The  sequence 
is  shown  in  Figures  48,  49,  50,  and  51.  If  the  response  is 
"NO"  or  "N",  values  for  the  selected  variables  will  be  entered 
in  Engineering  units  using  the  alphanumeric  keyboard.  For 
values  to  be  input  as  percentiles,  Table  1  shows  the  sequence 
of  displayed  messages  and  user  responses  to  be  followed.  If 
the  values  are  supplied  through  the  alphanumeric  keyboard,  the 


-^Z-score  represents  the  extent  to  which  an  individual  value 
falls  above  or  below  the  mean  of  a  set  of  data. 
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VALUES  IN  PCTLS?  ENTER  Y/N 
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MEMBER  H  US  AF  ACCEPTED 

INDEPENDENT  VARIABLES  AVBL  A VBL 
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Figure  48.  INPUT  TWO  INDEPENDENT  VARIABLES  Function 

Option  to  Choose  Input  Values  in  Percentile 
or  in  Engineering  Unit. 
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L  P.  FIRST  INDEPENDENT  VARIABLE 
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Figure  49.  INPUT  TWO  INDEPENDENT  VARIABLE  Function 
Light-Pen  First  Independent  Variable. 


c**oipoipoifioipomoip  oip  otnoipoiproir 


l.p.  variable  in  other  coluhn 


MEHBER 

n  USAF  ACCEPTED 

INDEPENDENT  VARIABLES 

AVBL 

AVBL 

MAH  RELATED 

UNIT 

INPUT 

LENGTH  RELATED 

UNIT  INPUT 

UNI  TS 

PCTL 

WEIGHT . 

LB 

15  PCT 

SITTING  HEIGHT 

IN 

IN 

1 

2 

BIDELTIOD  brdth 

IN 

EVE  HGT/SITTING 

IN 

CH 

3 

5 

10 

m 1 P  BREADTH/SITT 

IN 

KNEE  HGT/SITTING 

IN 

HH 

chest  depth 

IN 

BUTTOC<-KNE  LGTM 

IN 

LB 

15 

20 

ELBON-GRIP  LGTH 

IN 

KG 

25 

30 

36 

THUMB-TIP  REACH 

IN 

no 

N5 

60 

65 


10 

16 

80 

85 

10 

16 

11 

18 

11 


Figure  50.  INPUT  TWO  INDEPENDENT  VARIABLE  Function 
Light-Pen  Second  Independent  Variable. 
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L .P .  PCTL  WITHIN  RANGE 
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Figure  51.  INPUT  TWO  INDEPENDENT  VARIABLE  Function 
Light-Pen  Percentile  for  the  Second 
Independent  Variable  Within  Range. 
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PROGRAM  MESSAGES  AND  USER  RESPONSES  FOR  PFKl 3 
WHEN  VALUES  WILL  BE  INPUT  AS  PERCENTILES 
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user  should  use  Table  2  as  a  guide  to  the  sequence  of  system 
messages  and  user  responses.  Once  the  independent  values  are 
supplied,  the  program  calculates  the  surface  dimensions  re¬ 
quired  to  construct  the  link  system  of  the  man-model.  These 
dimensions  are  calculated  using  multiple  regression  equations 
from  the  selected  regression  member  with  the  user  supplied 
dimensions. 
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TABLE  2 


PROGRAM  MESSAGES  AND  USER  RESPONSES  FOR  PFK13  WHEN 
VALUES  WILL  BE  INPUT  AS  ABSOLUTE  DIMENSIONS 

(Program  Responses  Are  Listed  in  Parenthesis) 


PROGRAM  MESSAGES 

USER  RESPONSES 

1.  VALUES  IN  PCTLS?  ENTER  Y/N 

Enter  "NOM  or  "N"  through  the  ANKB  fol¬ 
lowed  by  the  ALT-CODE/ 5  sequence.  Y  is 
the  default  value. 

2.  DESIRE  UNIT  CHANGE?  ENTER  Y/N 

If  input  units  are  other  than  inches 
and  pounds,  enter  "YES”  or  "Y"  through 
the  ANKB  followed  by  the  ALT-CODE/5 
sequence.  "NO”  is  the  default  value. 

3.  L.P.  FIRST  INDEP.  VARIABLE 

Light  pen  a  variable  from  either  mass 
or  length  column. 

(Selected  variable  is  underlined.) 

4.  L.P.  NEW  UNIT,  IF  DESIRED 

(If  response  to  message  2  is 
"YES".) 

If  a  unit  of  measurement  other  than  the 
one  listed  next  to  the  underlined  vari¬ 
able  is  desired,  light  pen  a  new  unit 
from  the  column  "AVBL  UNITS".  If  no 
change  is  desired,  press  ALT-CODE/5 
sequence . 

The  system  checks  that  the  unit  is 
valid  for  the  type  of  variable  and  dis¬ 
plays  it  next  to  the  input  value.  It 
also  checks  for  the  value  to  be  within 
range  for  the  selected  survey. 

5.  ENTER  NEW  VALUE 

Type  in  real  number  value  through  the 

ANKB,  followed  by  the  ALT-CODE/5  se¬ 
quence  . 

(Typed  value  will  be  displayed  next  to 
underlined  variable.) 

6.  L.P.  VBL  IN  OTHER  COLUMN 

Light  pen  a  variable  from  the  column 
not  selected  the  first  time. 

Selected  variable  will  be  underlined  if 
it  is  in  the  proper  column. 

7.  L.P.  NEW  UNIT,  IF  DESIRED 

(If  response  to  message  2  is 
"YES".) 

Light  pen  a  new  unit  or  depress  ALT- 
CODE/5  sequence  for  default  unit.  The 
system  check  the  unit,  computes  the 
range  and  displays  the  values  in  the 
informational  area. 

8.  ENTER  NEW  VALUE 

Type  in  real  number  value  within  the 
displayed  range,  through  the  ANKB,  fol¬ 
lowed  by  the  ALT-CODE/5  sequence. 

(Typed  value  will  be  verified  and  dis¬ 
played  next  to  the  underlined  variable.) 
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2.2.14  DISPLAY  TABLE  Function  (PFK14 ) 


The  DISPLAY  TABLE  function  provides  the  user  with 
the  opportunity  to  inspect  the  table  of  link  dimensions  and 
angles  and  make  changes  to  any  or  all  of  the  values,  if  neces¬ 
sary.  Since  the  table  displays  internal  link  lengths,  the 
anthropometry  of  the  man-model  should  be  defined  prior  to  using 
this  function.  Figure  52  shows  an  example  of  a  Display  Table. 

The  user  can  modify  the  values  in  the  Display 
Table  by  light-penning  the  value  to  be  changed,  typing  a  new 
value,  and  performing  ALT-CODE/5  sequence  (see  Figure  53). 
Vvhen  all  changes  are  made  the  user  performs  the  ALT-CODE/5 
sequence  to  display  the  new  man-model.  The  transformation 
angles  in  this  display  can  be  modified  to  place  the  man-model 
in  any  desired  position  (see  Paragraph  2.2.21). 

Other  than  the  choices  of  slumped  or  erect  pos¬ 
ture,  and  the  reposturing  in  the  reach  analysis,  using  the  LINK 
TABLE  to  change  the  joint  angles  is  the  user's  most  important 
method  to  change  the  body  position  of  the  man-model.  To  prop¬ 
erly  use  this  table  refer  to  Table  3  for  all  link  definitions. 

As  described  in  Section  1,  the  link  system  is  a 
series  of  vectors  added  together.  Each  link  vector  has  a  local 
coordinate  system  with  its  origin  at  the  distal  end.  The  ori¬ 
entation  of  the  next  link  is  defined  in  this  local  coordinate 
system.  The  Phi,  Theta,  and  Psi  correspond  to  Euler  angles  as 
shown  in  Figure  54.  Since  these  local  coordinate  systems  are 
usually  not  aligned  with  the  base  system  which  has  its  origin 
at  SRP,  no  rule  can  be  given  for  selecting  a  particular  direc¬ 
tion  of  movement.  The  user  should  try  angular  changes  one-by- 
one  to  obtain  desired  results. 

Any  change  made  in  link  length  is  reflected  in 
the  man-model  for  all  postures.  However,  changes  made  in 
angles  are  reflected  only  in  PROGRAMMED  Posture. 
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L  P,  value  to  change 
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Figure  52. 


DISPLAY  TABLE  Displays  Links,  Their  Lengths 
and  Euler  Angles. 
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Figure  53.  DISPLAY  TABLE  Change  THETA  Value  of  MH-MEYE 
from  90°  to  110°, 
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TABLE  3 


LINK  SYSTEM  DEFINITION 

LINK  NO.  NAME  DEFINITION 


0 

SRP 

Zero-length  link  at  the  SRP 

1 

SRP-MHIP 

SRP  to  mid-hip 

2 

STOMACH 

Mid-hip  to  L3/L4  disc 

3 

CHEST 

L3/L4  disc  to  T8/T9  disc 

4 

LWR  NECK 

T8/T9  disc  to  Tl  vertebra 

5 

UPR  NECK 

Tl  vertebra  to  atlas 

6 

MID  HEAD 

Atlas  to  mid-head  point 

7 

MH-MEYE 

Mid-head  point  to  mid-eye  point 

8 

MEYE-REY 

Mid-eye  point  to  right  eye 

9 

MEYE-LEY 

Mid-eye  point  to  left  eye 

10 

LN-MIDSS 

Tl  vertebra  to  mid-suprasternale 

11 

MSS-RSS 

Mid-suprasternale  to  right  suprasternale 

12 

RSS-RSLD 

Right  suprasternale  to  right  shoulder 

13 

RSLDR 

Zero-length  link  at  the  right  shoulder 

14 

RUPARM 

Right  shoulder  to  right  elbow 

15 

RLWARM 

Right  elbow  to  right  wrist 

16 

RGRIPCTR 

Right  wrist  to  grip  center  point 

17 

RFRCH 

Right  grip  center  point  to  functional  reach  point 

18 

RFNGRTIP 

Right  functional  reach  point  to  fingertip  reach  point 

19 

MSS-LSS 

Mid-suprasternale  to  left  suprasternale 

20 

LSS-LSLD 

Left  suprasternale  to  left  shoulder 

21 

LSLDR 

Zero-length  link  at  the  left  shoulder 

22 

LUPARM 

Left  shoulder  to  left  elbow 

23 

LLWRARM 

Left  elbow  to  left  wrist 

24 

LGRIPCTR 

Left  wrist  to  grip  center  point 

25 

LFRCH 

Left  grip  center  point  to  functional  reach  point 

26 

LFNGRTIP 

Left  functional  reach  point  to  fingertip  reach  point 

27 

MHIP-RHP 

Mid-hip  to  right  hip 

28 

RUPRLEG 

Right  hip  to  right  knee 

29 

RLWRLEG 

Right  knee  to  right  ankle 

30 

RNK-RRCH 

Right  ankle  to  bottom  of  the  right  foot 

31 

MHIP-LHP 

Mid-hip  to  left  hip 

32 

LUPRLEG 

Left  hip  to  left  knee 

33 

LLWRLEG 

Left  knee  to  left  ankle 

34 

LNK-LRCH 

Left  ankle  to  bottom  of  left  foot 
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1st  ROTATION  ABOUT  THE  Z  AXIS 


Z 


RIGHT  ARM 


DEFINES  THE  JOINT  ROTATION 
AXIS.  FOR  ELBOW,  4>  -0° 
BECAUSE  THIS  ANGLE  WAS 
ESTABLISHED  BY  <//  FROM 
THE  PREVIOUS  SYSTEM.  (THE 
ELBOW  IS  ROTATED  BY  THE 
UPPER  ARM). 


2nd  ROTATION  ABOUT  THE  NEWLY  FORMED 
Y*  AXIS.  FOR  THE  ELBOW, 

THIS  ANGLE  Q  IS  THE  DEVIATION 
FROM  A  STRAIGHT  ANGLE. 


3rd  ROTATION  ABOUT  THE  V  AXIS 
REPRESENTS  THE  ROTATION  OF 
THE  DISTAL  END  OF  LINK,  OR 
IN  THE  CASE  OF  THE  ELBOW 
SYSTEM,  IT  IS  THE  ROTATION 
OF  THE  FOREARM. 


HAND  PRONATED  v//«  90° 


PALM  UP  ^=0° 


Figure  54.  Example  of  Euler  Angle  Changes  for  Elbow 
Joints . 


2.2.15  DUMP  CRT  Function  (PFK15 ) 


The  DUMP  CRT  function  plots  the  display  on  the 
2250  screen  to  the  Gould  Plotter.  This  plot  includes  the 
prompting  area,  the  information  area,  and  the  COMBIMAN  display 
area.  A  sample  plot  of  the  DUMP  CRT  function  is  shown  in  Fig¬ 
ure  55.  However,  to  get  a  CRT  Dump,  the  Region  parameter  on 
STEPl  in  Figure  61  has  to  be  changed  from  550K  to  600K  or  high¬ 
er  depending  on  the  plotter  and  the  size  of  the  crew  station. 
This  plot  is  different  from  the  on-line  plot  describee  in  Para¬ 
graph  2.2.9  because  there  is  no  choice  of  scale  or  perspective 
views  and  it  is  a  10"  x  10"  hard  copy  plot  of  the  12"  x  12"  CRT 
display.  The  DUMP  CRT  function  is  available  to  the  user  at  all 
times  like  the  ALT-CODE/O  cancel  option. 
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DEPRESS  PFh  TO  SELECT  0  FUNCTION 


VIEW 


XT  XZ  YZ 

REGRESS: R67  USRF  SURVEY: 67  U5RF  CRST:  R7E-D1 

FLIGHT  SUIT:  NONE  HELMET  TrPE:  NONE  POSTURE  MOBILITY  OFF-AXIS 

SEAT  TYPE:  HARD  OFF!  P.0  0.0  0.0  1  SLUMPED  ARM 


RPY(  0.0.  -1S.0.  15.0) 


Figure  55.  DUMP  CRT  Function.  2250  Screen  Display 
Plotted  on  the  On-Line  GOULD  Plotter. 
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2.2.16 


DESIGN  PANEL  Function  (PFK16) 


The  DESIGN  PANEL  function  allows  the  user  to  add 
a  panel  to  an  existing  crew  station,  or  design  a  new  crew  sta¬ 
tion  by  assembling  a  series  of  new  panels. 

In  response  to  prompting  message  "ENTER  PANEL 
NAME"  the  user  must  type  a  panel  name  of  up  to  eight  characters 
and  enter  it  by  performing  ALT-CODE/5  sequence.  To  the  prompt¬ 
ing  message  "ENTER  PANEL  TYPE"  the  user  should  enter  a  type 
number  "1"  for  general  crew  station,  "2"  for  seat  panel,  and 
"3"  for  rudder  or  brake  pedal  through  the  ANKB  followed  by 
ALT-CODE/5  sequence.  Finally  as  a  response  to  the  message 
"ENTER  NUMBER  OF  VERTICES"  the  user  must  supply  the  number  of 
vertices  for  the  new  panel.  The  number  of  vertices  must  be  3, 
4,  5,  or  6.  Then  with  the  cross  symbol  "  +  "  and  the  lighted 
PFKs  (see  Figure  33)  ,  the  user  defines  the  vertices  of  the 
panel,  one  at  a  time,  in  the  X-Z  plane  and  then  in  the  Y-Z 
plane  using  the  method  described  in  Paragraph  2.2.11.1*. 

As  mentioned  in  Paragraph  2.2.11,  PFK12  is  used 
to  stop  the  "+"  while  in  motion.  When  PFK12  is  depressed  twice 
consecutively,  the  location  of  the  vertex  is  defined  in  the 
displayed  view.  When  subsequent  vertices  are  defined,  they  are 
automatically  connected  by  lines. 

The  panel  thus  defined  can  be  treated  like  any 
other  panel.  It  will  not,  however,  be  automatically  added  to 
the  permanent  Crew  Station  Data  Base. 

The  newly  designed  panel  name  and  coordinates 
will  appear  on  the  printout  as  shown  in  Figure  56. 

The  panel  will  be  erased  when  the  "ERASE"  option 
of  the  RETRIEVE  CREW  STATION  function  is  selected  again. 


*The  program  assigns  the  lowest  unused  sequence  number  as  the 
"internal  rererence  number"  for  this  new  panel. 
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Figure  56.  Printed  Output  of  the  Newly  Designed  Panel 
NEWPNL  is  Within  the  Box. 
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2.2.17 


DELETE  PANEL  Function  (PFK18 ) 


The  DELETE  PANEL  function  allows  the  user  to 
remove  a  crew  station  panel  from  the  display.  It  does  not 
remove  the  panel  from  the  Crew  Station  Data  Base.  Once  delet¬ 
ed,  the  panel  cannot  be  recalled  using  the  INCLUDE  OBJECT  func¬ 
tion.  It  must  be  either  recreated  by  the  DESIGN  PANEL  func¬ 
tion,  or  the  entire  crew  station  must  be  recalled  again  using 
the  RETRIEVE  CREW  STATION  function  in  Paragrapn  2.2.6.  In  both 
cases,  the  crew  station  will  be  reset  to  its  original  configu¬ 
ration. 


To  delete  a  panel,  the  name  of  the  panel  must  be 
entered  through  the  ANKB  as  response  to  prompting  message  "EN¬ 
TER  PANEL  NAME".  If  the  specified  panel  does  not  exist,  the 
program  repeats  the  prompt  until  the  user  specifies  an  existing 
panel,  or  performs  ALT-CODE/5  sequence.  If  no  name  is  speci¬ 
fied  by  signaling  only  ALT-CODE/5  sequence,  the  function 
request  is  ignored  and  no  deletion  occurs.  The  panel  name  can 
De  found  with  the  IDENTIFY  OBJECT  function  described  in 
Paragraph  2.2.2. 


The  DELETE  PANEL  function  is  different  from  the 
OMIT  OBJECT  function  because  this  function  deletes  the  panel 
from  the  display  and  cannot  be  redisplayed  by  invoking  the 
INCLUDE  OBJECT  function. 
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2.2. 18  CHANGE  PERSPECTIVE  Function  (PFK22) 


The  CHANGE  PERSPECTIVE  function  allows  the  user 
to  change  the  point  of  view  and/or  the  effective  viewing 
distance  between  the  displayed  man-model  and  the  crew  station. 
This  function  is  useful  in  enhancing  the  perspective  and  there¬ 
fore  the  three  dimensional  character  of  the  displayed  image. 

To  activate  the  CHANGE  PERSPECTIVE  function, 
first  depress  PFK22 .  The  program  displays  the  message  "VIEW 
ADJUST"  and  temporarily  redefines  PFKs  1,  2,  3,  4,  5,  6,  9,  and 
10  as  shown  in  Figure  57.  It  the  user  depresses  PFK9 ,  the  mes¬ 
sage  "L.P.  NEW  CENTER  POINT"  is  displayed.  The  user  may  re¬ 
spond  by  light-penning  any  desired  point  in  the  display.  Now 
the  program  displays  the  man-model  and  the  crew  station  as  if 
looking  along  the  point  light-penned.  The  perspective  of  the 
display  is  initialized  as  if  the  viewing  distance  is  30  feet 
away  from  the  screen.  This  distance  may  be  increased  in  incre¬ 
ments  of  10  feet  by  repeatedly  depressing  PFKl,  or  decreased 
(closer  to  the  screen)  in  increments  of  10  feet  by  depressing 
PFK3.  This  distance  increment  may  be  redefined  by  selecting 
PFK4,  for  a  1  foot  increment;  PFK5,  for  a  10  feet  increment;  or 
PFK6,  for  a  100  feet  increment.  However,  the  lower  and  upper 
limits  for  the  effective  viewing  distance  are  10  feet  and  1,000 
feet  respectively. 


PFK9  must  be  depressed  to  select  another  view 


point . 


PFK2  must  be  depressed  to  terminate  the  CHANGE 
PERSPECTIVE  function  and  to  return  to  the  main  program,  reset¬ 
ting  all  PFKs  to  the  original  definition. 
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Figure  57.  PFK's  for  Change  Perspective  Function. 
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PFK10  terminates  the  CHANGE  PERSPECTIVE  function, 
resetting  the  display  and  PFK  definitions  to  their  original 
positions. 


Example:  To  view  the  display  with  respect  to  the 
left  eye  of  the  man-model,  first  depress  PFK22.  Then  the  PFKs 
1#  2,  3,  4,  5,  6,  9,  and  10  light  up  and  the  message  "VIEW  AD¬ 
JUST"  is  displayed  along  with  the  man-model  and  crew  station. 
Depress  PFK9  and  respond  to  the  prompting  message  on  the  screen 
"L.P.  NEW  CENTER  POINT"  by  light-penning  the  left  eye  of  the 
man-mooel.  The  new  display  will  be  along  a  line  with  the  same 
horizontal  and  vertical  coordinates  as  the  left  eye  of  the 
man-model . 
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2.2.19  RESET  SLUMPED  POSTURE  Function  (PFK23) 


The  RESET  SLUMPED  POSTURE  function  resets  the 
transformation  angles  of  the  man-moael  so  that  it  assumes  a 
slumped  posture,  as  shown  in  Figure  58.  The  "slumped  posture" 
is  a  posture  for  sitting  erect  in  a  seat  with  13  degree  back 
angle  and  a  6  aegree  seat  pan  angle.  If  other  postures  are 
desired,  the  skeletal-link  angles  have  to  be  changed  by  the 
method  specified  in  Paragraph  2.2.14,  the  DISPLAY  TABLE  func¬ 
tion  and  the  RESET  PROGRAMMED  POSTURE  function  as  described  in 
Paragraph  2.2.21.  This  function  is  commonly  used  to  get  back 
to  a  starting  posture  after  a  reach  analysis  or  a  modification 
of  joint  angles  as  described  in  Paragraph  2.2.14.  The  SLUMPED 
POSTURE  is  also  the  default  posture  of  the  man-model. 
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Figure  53. 


RESET  SLUMPED  Posture  Function. 
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2.2.20  RESET  ERECT  POSTURE  Function  (PFK24 ) 


The  RESET 
transformation  angles  of 
standard  erect  posture  as 


ERECT  POSTURE  function 
the  man-model  so  that  it 
shown  in  Figure  59. 


resets 

assumes 


the 

the 
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Figure  59.  RESET  ERECT  POSTURE  Function. 
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2.2.21  RESET  PROGRAMMED  POSTURE  Function  (PFK25 ) 


The  RESET  PROGRAMMED  POSTURE  function  resets  the 
transformation  angles  of  the  man-model  so  that  it  assumes  the 
"Programmed  Posture"  .  The  "Programmed  Posture"  is  any  posture 
the  user  desires,  which  can  be  achieved  by  modifying  the  trans¬ 
formation  angles  using  the  DISPLAY  TABLE  function  (see  Para¬ 
graph  2.2.14).  After  all  changes  are  made,  the  new  posture  of 
the  man-model  can  be  redisplayed  at  any  time  by  depressing 
PFK25  (see  Figure  60) . 

When  the  program  CBM05  is  initialized,  the  angles 
for  the  SLUMPED  POSTURE  are  automatically  entered  into  this 
PROGRAMMED  POSTURE  storage  area,  so  initially  pressing  the 
PFK25  merely  recalls  the  SLUMPED  POSTURE.  However,  anytime  the 
user  changes  any  one  or  more  angles  in  the  link  system  Display 
Table,  the  changed  angles  are  automatically  entered  into  the 
PROGRAMMED  POSTURE  storage  area.  This  function  may  be  thought 
of  as  a  "redisplay"  of  the  last  change  to  the  Display  Table 
(see  Paragraph  2.2.14). 

The  angles  changed  by  this  function  are  not 
stored  permanently.  Therefore,  everytime  a  new  man-model  is 
defined  the  angles  for  PROGRAMMED  POSTURE  must  be  redefined. 

This  function  may  be  used  to  define  a  working 
posture  to  the  user's  own  specification.  Normally,  a  pilot 
sits  with  upper-back  and  head  well  forward,  causing  the  eye 
position  to  be  lowered.  Since  one  posture  will  not  serve  all 
applications,  this  function  allows  the  user  to  define  and  re¬ 
call  any  posture. 
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Figure  60.  RESET  PROGRAMMED  POSTURE  Function. 
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2.2.22 


INCREMENT  ROLL,  PITCH,  AND  YAW  ANGLE  Function 

(PFK26) 


The  INCREMENT  ROLL,  PITCH  AND  YAW  ANGLE  function 
allows  the  user  to  enter  a  set  of  roll,  pitch  and  yaw  angle 
increments  by  which  the  man-model  and  crew  station  are  rotated; 
and  a  maximum  number  of  iterations  desired  before  the  display 
resets  to  roll,  pitch  and  yaw  angle  values  of  0.0  degrees.  It 
is  similar  to  a  series  of  "CHANGE  VIEW"  function  calls  describ¬ 
ed  in  Paragraph  2.2.1. 

This  feature  allows  the  user  to  rapidly  rotate 
the  model  through  a  series  of  discrete  steps  without  taking  the 
time  to  enter  new  roll,  pitch,  and  yaw  angles  using  the  CHANGE 
VIEW  function.  In  the  default  case  built  into  the  program,  the 
display  assumes  a  side  view  with  the  first  selection  of  PFK26 
and  on  each  depression  of  PFK26  the  displayed  image  rotates  -15 
degrees  in  pitch  (nose  up)  and  +15  degrees  in  yaw  (left)  for 
six  discrete  steps,  ending  with  a  top  view  of  the  displayed 
crew  station.  The  next  depression  of  PFK26  resets  the  display 
to  the  original  side  view.  The  user  may  pause  after  any  step 
to  make  a  plot,  or  select  other  functions. 

The  preprogrammed  example  uses  six  discrete  rota¬ 
tional  increments  of  0  degrees,  -15  degrees,  and,  +15  degrees 
for  the  roll,  pitch,  and  yaw  angles.  The  user  may  redefine  the 
number  of  increments  or  the  roll,  pitch,  and  yaw  increments  in 
the  following  manner. 

First  set  State  Switch  10  "ON"  as  described  in 
Paragraph  2.2.24.  Then  depress  PFK26  and  respond  to  message 
"ENTER  ROLL  ANGLE"  by  entering  the  ROLL  increment  angle  in 
aegrees  through  the  ANKB .  Respond  to  subsequent  messages  to 
enter  PITCH  and  YAW  angles  the  same  way.  The  message  "ENTER 
MAX.  NO.  ITERATIONS"  then  appears  in  the  Prompting  Area  of  the 
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CRT.  The  user  must  then  type  the  number  of  steps  the  program 
should  take  to  reset  the  man-model  from  the  ANKB  followed  by 
ALT-CODE/5  sequence.  If  the  user  wishes  to  change  the  Roll, 
Pitch,  and  Yaw  angles  or  the  number  of  iterations  again,  the 
State  Switch  10  must  once  again  be  set  "ON"  and  PFK26  depressed 
as  above. 
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2.2.23  SEAT  ADJUST  Function  ( PFK27 ) 


The  SEAT  ADJUST  function  allows  the  user  to  off¬ 
set  the  man-model  and  his  seat,  if  any,  with  respect  to  the 
displayed  crew  station.  This  function  cannot  be  activated 
unless  a  crew  station  is  displayed  on  the  CRT  screen.  A  seat 
may  or  may  not  be  preset  at  the  user's  option.  The  default 
values  of  the  coordinates  for  this  function  are  X=0,  Y=0,  and 
Z=0.  After  depressing  PFK27 ,  the  user  is  prompted  to  enter  the 
X  coordinate  off-set.  The  value  in  inches  is  typed  using  the 
ANKB  and  is  entered  by  performing  the  ALT-CODE/5  sequence  as 
shown  in  Figure  61.  If  the  default  value  (0  inch)  is  to  be 
retained,  simply  perform  the  ALT-CODE/5  sequence.  The  program 
then  prompts  the  user  to  enter  the  Y  and  Z-coordinates  in  that 
order.  The  user  must  enter  them  the  same  way  the  X-coordinate 
is  entered.  The  new  coordinates  will  be  displayed  in  the  In¬ 
formation  Area.  Since  the  seat  may  be  "adjusted"  in  three 
dimensions,  this  provides  a  method  for  placing  the  man-model 
(and  seat)  in  different  stations  in  a  multi-operator  crew  sta¬ 
tion. 
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Figure  61.  SEAT  ADJUST  Function  Enter  X  Coordinate 
Offset  in  Inches. 
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2.2.24 


ZOOM  Function  ( PFK28 ) 


The  ZOOM  function  allows  the  user  to  "Zoom-in"  on 
a  user  defined  portion  of  the  COMBIMAN  Display  Area.  To  acti¬ 
vate  the  ZOOM  function  depress  PFK28 .  The  message  "DEFINE  ZOOM 
WINDOW"  momentarily  appears  in  the  Prompting  Area  of  the  CRT. 
Next,  a  matrix  of  dots  at  0.5  inch  intervals  cover  the  COMBIMAN 
Display  Area  and  a  message  "L.P.  LOWER  LEFT  CORNER"  appear  in 
the  Prompting  Area  of  the  CRT  as  shown  in  Figure  62. 


To  cancel  the  ZOOM  function  at  this  point,  simply 
perform  the  ALT-CODE/5  sequence  and  the  program  returns  to  the 
main  routine.  Otherwise  light  pen  a  dot  to  designate  the  lower 
left  hand  corner  of  the  proposed  zoom  window.  Now  the  program 
displays  the  limiting  left  and  bottom  lines  of  the  window,  and 
erases  all  dots  below  the  horizontal  line  and  left  of  the  ver¬ 
tical  line.  Also  the  message  "L.P.  UPPPER  RIGHT  CORNER"  ap¬ 
pears  in  the  Prompting  Area  of  the  screen  as  shown  in  Figure 
63.  The  user  may  enter  the  ALT-CODE/5  sequence  to  register  the 
upper  right  corner  of  the  Display  Area  as  the  upper  right  cor¬ 
ner  of  the  zoom  window  or  may  light  pen  a  dot  to  define  the 
upper  right  corner  of  the  zoom  window.  Now  all  the  dots  are 
removed  and  the  completed  zoom  window  boundaries  are  displayed 
as  shown  in  Figure  64.  The  display  is  then  regenerated  with 
the  information  within  the  defined  zoom  window  filling  the 
entire  Display  Area  of  the  CRT  as  shown  in  Figure  65. 


The  message  "END  ZOOM?  ENTER  Y/N"  then  appears  in 
the  Promtping  Area  of  the  CRT.  The  user  now  has  the  option  to 
zoom-in  further  on  the  current  display  by  answering  "N"  or  "NO" 
using  the  ANKB,  or  to  end  the  ZOOM  function  by  depressing  the 
ALT-CODE/5  sequence.  Note  that  "Y"  or  "YES"  is  the  default  for 
the  "END  ZOOM?  ENTER  Y/N"  message.  When  the  ZOOM  function  is 
ended,  control  returns  to  the  main  routine,  however,  the 
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Figure  62. 


Define  ZOOM  Window.  Step  1  -  Light  Pen 
Lower  Left-Hand  Corner  of  the  ZOOM  Window 
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Figure  63.  Define  ZOOM  Window.  Step  2  -  Light  Pen 
Upper  Right  Corner  of  ZOOM  Window. 
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Figure  64.  The  Fully  Defined  ZOOM  Window. 
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Figure  65.  The  "ZOOMED"  Display.  Choose  Option  to 
Continue  or  to  End  ZOOM  on  the  "ZOOMED" 
Display . 


135 


display  will  remain  in  the  zoom  state  until  execution  ot 
another  function  causes  regeneration  of  the  display.  Note  that 
in  order  to  return  the  display  to  the  normal  scaling  and 
perspective  at  the  termination  of  the  ZOOM  function.  State 
Switch  21  must  be  set  "ON",  prior  to  depressing  PFK28  to  exe¬ 
cute  the  ZOOM  function. 


When  the  user  answers  "N"  or  "NO"  to  the  prompt¬ 
ing  message,  "END  ZOOM?  ENTER  Y/N"  the  message  "DEFINE  ZOOM 
WINDOW"  is  displayed.  The  user  then  defines  a  new  zoom  window 
on  the  already  zoomed-in  display.  The  ZOOM  process  continues 
until  an  ALT-CODE/5  sequence  is  detected  for  the  lower  left 
corner  of  the  zoom  window,  or  a  response  other  than  "N"  or  "NO" 
is  entered  upon  completion  of  a  requested  ZOOM. 
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2.2.25 


STATE  SWITCH  Function  (PFK29) 


The  STATE  SWITCH  function  allows  the  user  to 
specify  the  state  in  which  to  run  the  program  CBM05.  Table  4 
shows  the  various  state  switches  available  and  the  meanings  of 
their  states. 


When  this  function  is  selected  by  depressing 
PFK29 ,  the  message  "ENTER  SWITCH  NUMBER"  is  displayed.  The 
user  must  enter  the  switch  number  from  the  ANKB  followed  by  the 
ALT-CODE/5  sequence.  Then  the  message  "ENTER  ON  OR  OFF"  is 
displayed.  The  user  must  respond  "ON"  or  "OFF"  from  the  ANKB 
to  invoke  the  state  detailed  in  Table  4. 

When  switch  16  is  chosen,  and  is  set  "ON",  the 
message  "ENTER  ENFLESHMENT  DENSITY  CODE"  is  displayed.  The 
user  enters  any  number  from  1  to  4  for  increased  enfleshment 
point  density,  any  negative  value  for  decreased  enfleshment 
point  density,  and  0  for  normal  enfleshment  from  the  ANKB  and 
follows  it  by  ALT-CODE/5  sequence.  The  man-model  is  displayed 
with  the  new  enfleshment  density.  If  switch  16  is  set  "OFF", 
the  default  value  of  "0"  is  chosen  and  the  man-model  is  dis¬ 
played  with  the  normal  enfleshment  density.  The  man-model 
display  with  enfleshment  density  code  "4"  is  shown  in  Figure  66. 
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TABLE  4 


PROGRAM  CBM05  USER  ACTIVATED  STATE  SWITCHES 


SWITCH 

NUMBER 

IF  ON 

IF  OFF 

2 

Prints  crew  station  data. 

Does  not  print  crew  station  data- 

3 

The  entire  COMBIMAN  link 
system  is  displayed. 

Only  the  neck,  head,  and  eye  links 
are  displayed 

4 

Prints  12  independent  anthro¬ 
pometric  dimension  values  on 
unit  6. 

No  printed  output. 

5 

No  enfleshment  on  man-model. 
(Link  system  only.) 

Enfleshed  man-model  is  displayed. 

6 

Print  surface  dimensions  and 
computed  internal  link  lengths. 
(As  in  Figures  67  and  68.) 

Suppress  printing  surface  and  link 
length  data. 

10 

Reset  default  conditions  when 
PFK26  activated  for  roll, 
pitch,  and  yaw  angles. 

Use  default  conditions  for  PFK26. 

16 

Allows  to  change  enfleshment 
density  code  for  man-model. 

Default  value  for  enfleshment  den¬ 
sity  code  *0'  is  assumed. 

20 

Prints  coordinate  data  of 
visibility  plot  as  in  Figure 

33. 

No  printed  output. 

21 

Zoomed  display  does  not  stay. 

Zoomed  display  stays. 

22 

12  Anthropometric  dimensions 
input  from  cards 
( COMBIMAN. SMPLANTH) . 

12  Anthropometric  dimensions  cannot 
be  input  from  cards. 

72 

Matrices  (link)  printed,  as 
shown  in  Figure  69. 

No  printed  output. 
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Figure  66.  Man-Model  with  Enfleshment  Density  Code  4 
(Default  Enfleshment  Density  Code  is  0) . 
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67.  Surface  Dimensions  and  Internal  Link  Lengths  Calculated 
by  CBM05 . 
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Figure  68.  Printed  Output  of  the  Two  Selected  Independent  Variable 
Values  Calculated  by  CBM05. 
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Figure  69.  Transformation  Equation  Developed  for  Positioning 
Stomach  Link  (Set  State  Switch  72  ON) . 


2.2.26  RESTART  PROGRAM  Function  ( PFK30 ) 


The  RESTART  PROGRAM  function  allows  the  user  to 
start  program  CBM05  over  again.  When  this  function  is  evoked, 
all  State  Switches,  Anthropometric  dimensions,  and  crew  station 
data  must  be  redefined.  Note  that  any  modifications  made  to 
link  lengths,  link  angles,  or  crew  station  definitions  before 
depressing  PFK30  are  lost.  The  message  "CBM003I  PROGRAM  RE¬ 
START"  is  written  on  output  unit  8. 
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2.2.27 


END  PROGRAM  Function  (PFK31) 


The  END  PROGRAM  function  displays  the  COMBIMAN 
Banner  and  terminates  the  program  CBM05,  prints  data  on  output 
unit  6  and  messages  on  output  unit  8. 
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END  OF  COMBIMAN  PROGRAM. 
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2.3  EXECUTING  THE  JOB 


This  sequence  is  intended  to  assist  the  user  to  load  the 
program  CBM05,  to  specify  processing,  to  handle  error  proce¬ 
dures,  to  obtain  output,  and  to  end  the  program  run.  It  will 
not  describe  data  formats  and  program  functions  because  they 
are  described  in  detail  in  Paragraph  2.2  of  this  section. 

2.3.1  Loading  the  Program  CBM05 


The  Job  Control  Cards  to  load  the  program  CBM05 
are  shown  in  Figure  70.  The  program  begins  execution  of  CBM05 
by  displaying  the  COMBIMAN  banner.  When  the  user  depresses 
PFKO,  "enabled"  PFKs  light  up  and  the  message  "DEPRESS  PFK4  TO 
SELECT  ANTH  DATA"  is  displayed.  Now  the  user  can  begin  pro¬ 
cessing  the  man-model  by  depressing  PFK4  to  select  anthropom¬ 
etry.  The  processing  performed  by  enabled  or  lighted  function 
keys  are  explained  in  Paragraph  2.2. 

Anthropometric  and  crew  station  geometry  data 
necessary  to  execute  the  interactive  program  CBM05  are  created 
and  maintained  by  the  programs  CBMAM,  CBMCM,  and  CBMVM  describ¬ 
ed  in  Sections  4,  5,  and  6.  The  user  may  select  data  from 
these  data  bases  or  may  modify  them  to  suit  the  situation.  All 
interactions  with  the  program  are  done  through  the  Program 
Function  Keyboard,  the  Alphanumeric  Keyboard,  and  the  Light  Pen. 


2.3.2 


Error  Procedures 


The  program  CBM05  performs  some  preliminary  error 
checking  on  the  data  supplied  by  the  user.  The  majority  of 
checking  is  performed  for  data  values  which  are  outside  the 
limits  built  into  the  program  or  the  wrong  type  (i.e.  alpha  or 
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Figure  70.  JOB  CONTROL  CARDS  to  Execute  CBM05 


numeric).  For  example:  State  Switch  numbers  must  be  between  1 
and  72;  the  maximum  number  of  panels  for  any  crew  station 
configuration  to  be  displayed  cannot  exceed  250;  and  all 
anthropometric  dimensions  entered  must  be  positive  values. 
When  the  user  light-pens  or  types  in  values  which  are  out  of 
range,  the  program  prompts  the  user  to  retry  the  entry. 
Numerical  values  can  be  typed  with  or  without  a  decimal  point, 
at  the  user's  option. 

Example  1.  Enter  State  Switch  number  "3". 

This  can  be  done  in  any  one  of  the  following  ways. 

(a)  Type  "3"  and  depress  ALT-CODE/5. 

(b)  Type  "3."  and  depress  ALT-CODE/5. 

(c)  Type  "3.0"  and  depress  ALT-CODE/5. 

If  the  program  expects  a  whole  number,  decimal 
values  are  rounded  off  to  the  nearest  Integer. 
Example  3.4  and  2.7  are  rounded  off  to  3. 

If  the  program  expects  two  decimal  places,  the 
input  number  is  rounded  off  accordingly. 

Example  2.  Change  a  value  in  the  link  table  from 
10.50  to  11.32. 

Light-pen  10.50,  then  Type  "11.32"  and  depress 
ALT-CODE/5. 

Typing  "11.319"  or  "11.3215"  and  depressing 
ALT-CODE/5  has  the  same  effect  as  entering  11.32. 

If  a  Program  Function  Key  is  depressed  the  corre¬ 
sponding  function  as  described  in  Paragraph  2.2  is  enabled. 
However,  if  a  key  is  pressed  erroneously,  the  following  proce¬ 
dure  may  be  followed  to  return  to  the  main  program. 

For  Program  Function  Keys  0,  1,  2,  3,  6,  7,  8, 

11  ,  14  ,  16  ,  18  ,  28  ,  and  29  depress  ALT-CODE/5  to  cancel  the 

selected  function. 
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With  Program  Function  Keys  4,  12,  13,  and  27,  the 
function  must  be  executed. 

For  Program  Function  Key  5,  light-pen  "♦NONE*"  in 
the  display  to  cancel  the  execution  of  the  RETRIEVE  CREW 
STATION  function. 

For  Program  Function  Keys  9,  15,  23,  24,  25,  26, 
30,  and  31,  the  functions  are  executed  as  soon  as  the  PFKs  are 
depressed . 

For  Program  Function  Key  22,  depress  the  tempo¬ 
rarily  defined  PFK2  or  PFK10  to  return  to  the  main  graphics 
routine . 

2.3.3  Ending  the  Program  CBM05 

There  are  three  ways  to  end  program  CBM05.  The 
primary  method  for  terminating  the  program  is  through  CBM05,  by 
depressing  the  END  PROGRAM  function  key  PFK31.  This  option  can 
be  exercised  only  when  the  message  "DEPRESS  PFK  TO  SELECT  A 
FUNCTION"  appears  in  the  Prompting  Area  of  the  CRT.  Another 
method  to  terminate  execution  of  the  program  is  to  use  the 
CANCEL  key  on  the  IBM  2250  Alphanumeric  Keyboard.  When  CANCEL 
key  and  ALT  CODE  key  are  depressed  together,  the  three  options 
shown  in  Figure  71  are  displayed. 

Light-penning  the  "TERMINATE"  option  terminates 
the  program  without  producing  a  memory  dump  of  program  CBM05. 
The  "DUMP"  option  terminates  the  program  and  produces  a  full 
storage  dump.  The  "RESUME"  resumes  the  execution  of  program 
CBM05  as  though  the  CANCEL  key  had  not  been  used.  This  option 
is  provided  by  the  system  and  can  be  used  at  any  time. 

The  third  option  is  to  cancel  the  JOB  from  the 
computer  operator's  console.  This  is  a  system  dependent  option. 
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*  terminate 


*  DUMP 


*  RESUME 


Figure  71.  Options  Displayed  on  Depressing  ALT  CODE 
and  CANCEL  Keys  Together. 


150 


2.4  PROGRAM  MESSAGES- INFORMATION  AND  ERROR  TYPES 


The  program  CBM05 

prints  out  both  information  and  action 

oriented  messages.  The 

message  format  is  as  follows: 

CBMOnni 

Message  Text 

where: 


CBM 

identifies  the  message  and  indicates 
that  the  message  originates  from  the 
COMBIMAN  system, 

0 

identifies  the  message  and  indicates 
that  the  message  originates  from  the 
program  CBM05, 

nn 

is  the  message  number. 

i 

is  the  action  code  (I=intormation, 
A=action  to  be  performed) ,  and 

Message  Text 

is  the  message  text. 
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The  messages  are  as  follows: 


CBM001I 


CMB002I 


CBM003I 


CBM007I 


CBM009I 


COMBIMAN  V5, 
Issued  By: 
Reason : 

System  Action 
User  Action: 


DATE=MM/DD/YY,  TIME=hh.mm. 
CBMINT. 

Program  CBM05  started 
and  time. 

:  Execution  continues. 

None . 


ss . 
at 


this 


date 


PROGRAM  END. 
Issued  By: 
Reason : 

System  Action: 
User  Action: 


CBMRTS . 

The  user  requested  the  END  PROGRAM 
function . 

The  program  ended  as  requested. 

None . 


PROGRAM  RESTART 
Issued  By: 
Reason : 

System  Action: 
User  Action: 


CBMRTS. 

The  user  requested  the  RESTART  PRO¬ 
GRAM  function. 

The  program  restarted  as  requested. 
None . 


panel  number.)  panel  name,  TYPE=nn,  nn  VERTICES. 
Issued  By:  CBMPNL  or  CBMCRW 

Reason:  The  user  defined  a  panel  through  the 

DESIGN  PANEL  function. 


or 

The  User  requested  the  crew  station 
data  by  setting  state  switch  2  ON. 
System  Action:  The  defined  panel  is  accepted  or  the 

crew  station  data  are  printed. 

User  Action:  None. 


SWITCH  switchnumber  ON/OFF 


Issued  By: 
Reason : 


System  Action: 
User  Action: 


CBMSSW . 

The  user  requested  a  change  in  the 
execution  of  the  program  using  the 
STATE  SWITCH  function. 

Switch  switchnumber  is  now  either 
"ON"  or  "OFF." 

None . 
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CBM010I 


CBM011I 


CBM012I 


CBM014I 


CBM015I 


IDENTIFIED  ob jectname 


Issued  By: 
Reason : 


System  Action: 


User  Action: 


CBMIOI . 

The  user  requested  the  IDENTIFY 
OBJECT  function  to  identify  an  ob¬ 
ject  displayed  on  the  screen. 

The  system  displays  the  name  of  the 
object,  the  coordinates  of  the 
distal-end  point,  and  the  internal 
"key"  number . 

None . 


OMITTED  ob jectname 


Issued 
Reason : 


By: 


System  Action: 


User  Action: 


CBMIOI . 

The  user  requested  that  an  object  be 
removed  from  the  display  using  the 
"OMIT  OBJECT"  function. 

The  light  penned  object  is  removed 
from  the  screen,  and  the  name  of  the 
object,  coordinates  of  the  distal- 
end  point,  and  the  internal  "key" 
number  are  displayed  on  the  screen. 
Record  the  internal  "key"  number  in 
order  to  include  the  object  in  the 
display  at  a  later  time. 


INCLUDED  ob jectname 
Issued  By: 

Reason : 


System  Action: 
User  Action: 


CBMIOI . 

The  user  requested  that  an  object  be 
included  back  into  the  display  using 
the  INCLUDE  OBJECT  function. 

The  requested  object  is  included 
back  into  the  display. 

None . 


Crew  Station  DATA  FROM  membername 


Issued  By: 
Reason : 


System  Action 
User  Action: 


CBMCRW. 

The  user  requested  the  retrieval  of 
a  crew  station  definition  by  the 
RETRIEVE  CREW  STATION  funtion. 

The  requested  crew  station  member  is 
retrieved. 

None . 


SURVEY  DATA  FROM  membername 


Issued  By: 
Reason: 


System  Action: 
User  Action: 


CBMIN1 . 

The  user  requested  membername  Survey 
Data  from  the  Anthropometric  Data 
Base . 

The  requested  survey  data  are  re¬ 
trieved  . 

None . 
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CBM016I 


CBM018A 


CBM019I 


CBM022A 


CMB026I 


VIEW=( roll,  pitch,  yaw),  SCALE=f actor , 
OFFSET= ( x,y , z) . 


Issued  By: 

CBMCVW . 

Reason: 

The  user  requested  a  new  off-axis 
view  through  the  "CHANGE  VIEW"  func¬ 
tion  . 

System  Action: 

The  display  is  rotated  as  speci¬ 
fied  . 

User  Action: 

None . 

INITIALIZATION 

DATA  MISSING. 

Issued  By: 

CBMINT. 

Reason : 

Initialization  Data  could  not  be 
found . 

System  Action: 

The  program  is  terminated. 

User  Action: 

Check  to  see  that  the  initialization 
data  set  has  not  been  destroyed. 

PLOTS  COMPLETED 

Issued  By: 

CBMCP1 . 

Reason : 

The  requested  hard  copy  plot  of  the 
COMBIMAN  display  is  finished. 

System  Action: 

Continue  processing 

User  Action: 

None . 

TOO  MANY  PANELS/VERTICES. 

Issued  By: 

CBMCRW . 

Reason : 

More  panels  were  defined  through  the 
RETRIEVE  CREW  STATION  function 

( PFK5 )  or  the  DESIGN  PANEL  function 
(PFK16)  than  could  be  handled  at  one 
time.  The  maximum  number  of  panels 
that  can  be  handled  at  one  time  is 
250. 

System  Action:  The  panel  being  defined  is  ignored. 

User  Action:  Delete  a  few  panels  by  the  DELETE 

PANEL  function  (PFK18)  or  delete  a 
crew  station  using  the  RETRIEVE  CREW 
STATION  function  before  defining 
more  panels. 

DELETE  PANEL  panelname. 

Issued  By:  CBMDPL . 

Reason:  The  user  requested  to  delete  panel 

panelname  using  the  DELETE  PANEL 
function . 

System  Action:  The  panel  is  deleted. 

User  Action:  None. 
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CBM031A 


CBM033I 


CBM034A 


CBM035A 


CBM039I 


CREW  STATION  DATA  BASE  MISSING. 


Issued  By: 
Reason : 


System  Action: 
User  Action: 


CBMCRW. 

Identification  record  of  the  file 
containing  a  crew  station  data  is 
missing . 

Displays  similar  message  to  CRT  and 
returns  control  to  main  program. 

Stop  program,  if  crew  stations  are 
needed . 


REGRESSION  VALUES  FROM  MEMBER  membername. 


Issued  By: 
Reason : 


System  Action: 
User  Action: 


CBMIN1 . 

User  entered  a  valid  regression  or 
type  0  anthropometric  data  base 
membername  using  light  pen. 

Data  from  the  referenced  member  are 
read . 

None . 


ANTHROPOMETRIC  DATA  BASE  MISSING. 


Issued  By: 
Reason : 


System  Action 
User  Action: 


CBMINT,  CBMIN1. 

The  identification  record  of  the 
file  which  contains  anthropometric 
data  is  missing. 

Displays  similar  message  on  CRT  and 
returns  control  to  main  program. 

Stop  program;  create  anthropometric 
data  base. 


VARIABLE  NO. 
INVALID  UNIT 
Issued  By: 
Reason : 


nn  OF 
OF  uu . 


REGRESSION  SURVEY  membername  HAS 


System  Action: 


User  Action: 


CBMIN1 . 

The  unit  of  measurement  read  in  for 
the  specified  variable  and  survey 
was  not  either  IN,  CM,  MM,  LB,  or  KG. 
Remainder  of  data  for  variable  is 
read  in. 

Report  condition  to  systems 
programmer . 


UNIT  OF  VARIABLE  vblname  HAS  BEEN  CHANGED  TO  UU 


Issued  By: 
Reason : 

System  Action: 
User  Action: 


CBMIND,  CBMDEP . 

The  user  changed  the  default  unit  of 
measurement  of  the  selected  variable. 
Flag  the  unit  as  being  changed. 

None . 
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CBM040A 


CBM041I 


CBM042I 


CBM043I 


CBM044I 


CBM045I 


INVALID  UNIT  OF  uu  SPECIFIED  FOR  VARIABLE  vblname. 
Issued  By:  CBMIND,  CBMDEP. 


Reason:  The  variable  in  question  was  defined 

in  the  anthropometric  survey  as  hav¬ 
ing  a  length  or  weight  type  of  mea¬ 
surement.  The  unit  specified  by  the 
user  was  not  consistent  with  the 
original  definition. 

System  Action:  Change  ignored. 

User  Action:  Specify  correct  unit  or  keep  default 

unit . 


INPUT  VARABLES 
Issued  By: 
Reason: 


System  Action: 
User  Action: 


WILL  BE  IN  PERCENTILES. 

CBMIND,  CBMDEP. 

User  has  indicated  that  values 
anthropometric  variables  will 
given  as  percentiles. 

None. 

None . 


for 

be 


INPUT  VARIABLES 
Issued  By: 
Reason : 


System  Action: 
User  Action: 


WILL  BE  IN  ABSOLUTE  VALUES. 
CBMIND,  CBMDEP. 

User  has  indicated  that  values 
anthropometric  variables  will 
given  in  engineering  units. 

None . 

None. 


for 

be 


USER  CHOOSES  TO 
Issued  By: 
Reason : 


System  Action: 
User  Action: 


INPUT  nn  DEPENDENT  VARIABLES. 

CBMDEP . 

User  has  depressed  PFK12,  indicating 
the  decision  to  enter  values  for  all 
the  dependent  anthropometric  vari¬ 
ables. 

None 
None . 


STANDARD  ERROR 
Issued  By: 
Reason : 

System  Action: 
User  Action: 


MULTIPLICATION  FACTOR  RESET  TO  nnn.nn. 
CBMIND. 

User  has  entered  a  new  value  for 
standard  error  of  estimate. 

Value  changed  internally. 

None . 


USER  CHOOSES  TO  INPUT  2  INDEPENDENT  VARIABLES. 


Issued  By: 
Reason : 


System  Action: 
User  Action: 


CBMIND. 

User  has  depressed  PFK13,  indicating 
the  decision  to  enter  values  for  two 
independent  anthropometric  variables. 
None. 

None . 
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CBM046 A 


CBM047A 


CBM048I 


CBM049A 


CBM052I 


CBM053A 


ANTHROPOMETRIC  DIMENSION  vblname  REFERENCED  BY  LINK 


link  name  DOES 
Issued  By: 
Reason: 


System  Action: 
User  Action: 


NOT  EXIST  IN  MEMBER  member name . 

CBMINl . 

One  of  the  vital  anthropometric  di¬ 
mensions  needed  to  generate  the  link 
length  in  question  does  not  exist  in 
the  referenced  survey  member. 

Program  ends. 

Print  contents  of  referenced  member 
from  Anthropometric  Data  Base,  using 
PRT  function  of  CBMAM . 


ABNORMAL  PROGRAM  END. 

Issued  By:  CBMINl . 

Reason:  Key  data  vital  to  the  construction 

of  the  man-model  were  not  available. 
System  Action:  Program  ends. 

User  Action:  Contact  systems  programmer. 


DATA  WRITTEN  FOR  OFF-LINE  PLOT  NO.  nn . 


Issued  By: 
Reason : 


System  Action: 
User  Action: 


CBMCPl . 

Coordinate  and  index  data  for  man- 
model  and  crew  station  configuration 
have  been  written  onto  disk  file 
specified  by  FT11F001  DD  card.  nn 
is  the  plot  number. 

None . 

None . 


I/O  ERROR  ON 
SAVED. 

Issued  By: 
Reason : 


System  Action: 
User  Action: 


UNIT  11.  OFF-LINE  PLOT  DATA  nn  NOT 
CBMCPl . 

Input-output  error  on  file  where 
coordinate  data  are  written.  Plot 
data  for  plot  nn  are  not  saved. 

Return  to  calling  program. 

None . 


VISIBILITY  PLOT 
Issued  By: 
Reason : 

System  Action: 
User  Action: 


GENERATED 
CBMVIS. 
Successful 
plot . 

None . 

None . 


FOR  visibility  member, 
completion  of  visibility 


NUMBER  OF  COMBINATIONS  OF  INDEPENDENT  VARIABLES 
SUPPLIED  BY  MEMBER  survey  name  DOES  NOT  EQUAL  THAT 
SUPPLIED  BY  MEMBER  regression  name. 


Issued  By: 
Reason : 


System  Action: 


User  Action: 


CBMINl. 

Values  for  number  of  independent 
combinations  are  different  from  num¬ 
ber  supplied  by  regression  member. 
Values  supplied  by  regression  member 
are  used. 

Contact  systems  programmer. 
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CBM054A 


CBM055I 


CBM056I 


CBM057I 


CBM058I 


NUMBER  OF  DEPENDENT  VARIABLES  SUPPLIED  BY  MEMBER 
survey  name  DOES  NOT  EQUAL  THAT  SUPPLIED  BY  MEMBER 
regression  name. 


Issued  By: 
Reason: 


System  Action: 


User  Action: 


CBMIN1. 

Values  for  number  of  dependent  vari¬ 
ables  are  different  from  number  sup¬ 
plied  . 

Values  supplied  by  regression  member 
are  used. 

Contact  systems  programmer. 


UNIT  9  NOT  A  VISIBILITY  DATA  BASE. 


Issued  By: 
Reason : 

System  Action: 
User  Action: 


CBMVIS. 

Identification  record  of  Visibility 
Data  Base  is  missing. 

Terminates  Visibility  Plot  Function. 
Stop  program  if  Visibility  Plot  is 
needed . 


TOO  MANY  VERTICES  nn  FOR  BOUNDARY  boundary  name. 

Issued  By:  CBMVIS . 

Reason:  The  number  of  vertices  on  boundary 

exceeded  100. 

System  Action:  Unpredictable  result  on  Visibility 

Plot. 

User  Action:  Limit  number  of  vertices  on  any  one 

boundary  to  100. 

TO  MANY  POINTS  nn  FOR  BOUNDARY  boundary  name. 

Issued  By:  CBMVIS . 

Reason:  The  number  of  points  on  any  boundary 

exceeded  2500  (ie.  the  perimeter  of 
the  boundary  exceeded  2500  inches) . 

System  Action:  Unpredictable  result  on  Visibility 

Plot. 

User  Action:  Limit  the  perimeter  of  the  boundary 

to  2500  inches. 


END  OF  DATA  ON  UNIT  9, 


Issued  By: 
Reason : 

System  Action: 
User  Action: 


CBMVIS. 

Insufficient  data  on  Unit  9 
rate  visibility  plot. 

Return  to  calling  program. 
Contact  systems  programmer. 


to  gene- 


158 


SECTION  3 

OFF-LINE  PLOT  PROGRAM  (CBMOFF) 


The  CBMOFF  is  an  off-line  plot  program  which  plots 
COMBIMAN  data  displayed  on  the  IBM  2250  screen.  When  the  user 
needs  a  plot  which  cannot  be  done  On-Line,  1  the  OFF-LINE  PLOT 
COMBIMAN  function  ( PFK7 )  is  depressed  to  store  the  man-model 
and  crew  station  data  of  the  display  currently  on  the  CRT  (see 
Paragraph  2.2.8).  The  user  may  store  as  many  sets  of  these 
data  as  needed  on  data  set  unit  11  (see  FT11F001  DD  card  on 
Figure  70).  Program  CBMOFF  plots  these  data  using  Calcomp  com¬ 
patible  software.  The  user  specifies  the  data  sets  to  be  plot¬ 
ted,  as  well  as  plot  size,  color,  and  content. 

The  following  information  is  intended  as  a  programmer's 
guide  to  use  the  program  CBMOFF. 


3.1  AVAILABLE  PROCESSING 

The  user  specifies  the  contents  and  size  of  the  plot  as 
well  as  its  color.  This  is  done  by  providing  the  following  two 
input  cards  along  with  the  plot  data  file. 

(1)  the  NAMELIST/CNTRL/,  and 

(2)  a  card  with  the  plot  numbers  of  those  data  sets  not 
to  be  plotted. 

The  information  supplied  on  these  cards  allows  the  user  to  vary 
plot  size,  plot  color,  and  plot  content  as  follows: 

^At  WPAFB  AFAMRL  we  use  a,  10"  Model  5000  Gould  electrostatic 
plotter  for  On-Line  plots  and  a  3-color  30"  Calcomp  plotter 
with  a  resolution  of  0.0002"  for  report  quality  output  and 
quarter-scale  Off-Line  plots. 
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(1)  The  NAMELIST/CNTRL/'s  variables  and  their  default 
values : 


FACTR  -  When  specified,  FACTR  is  the  plot  scale 
factor  for  that  program  run,  otherwise, 
the  scale  factor  specified  for  each  plot 
during  the  COMBIMAN  run  when  the  data 
were  generated  (see  Paragraph  2.2.8)  is 
used . 

LINKS,  FLESH,  and  CRST  -  These  three  variables  allow 
user  to  eliminate  the  link  system,  the 
enfleshment,  and/or  the  crew  station 
respectively  from  plots  for  that  program 
run.  Specifying  LINKS,  FLESH,  and/or 
CRST  equal  to  "1"  deletes  that  element(s) 
from  the  plots.  Using  the  default  values 

LINKS=0 
FLESH=0 ,  and 
CRST=0 

all  elements  on  the  CRT  display  are 
plotted . 

( ICOLOR ( I ) ,  1=1,4)  -  I COLOR ( I )  determines  the  pen 

color  for  element  "I"  of  the  plot  where, 

1=1  is  the  plot  banner, 

1=2  is  the  link  system, 

1=3  is  the  enfleshment,  and 

1=4  is  the  crew  station. 


The  default  values  of  the  pen  colors  for  plot  banner, 
link  system,  enfleshment  and  crew  station  are: 


ICOLOR( 1) =1 
ICOLOR ( 2 ) =1 
ICOLOR ( 3 ) =2 
ICOLOR ( 4 ) =3 


for  banner, 
for  link  system, 
for  enfleshment,  and 
for  crew  station. 


■^When  an  off-line  plot  is  made,  the  user  specifies  the 
color  assignments. 
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The  format  of  the  Namelist  CNTRL  is  as  follows  (see  Figure  72) : 


column  1  -  a  blank 

column  2  -  a  $3 

column  3-7  -  the  word  CNTRL 

column  8  -  a  blank 

After  column  8  comes  none,  all,  or  any  combination  of  the 

keyword  control  variables  in  the  form  FLESH=1,  FACTR=  .95, 
ICOLOR(2)=3,  .  ..,  the  last  one  followed  by  a  "$"  indicating  the 
end  of  the  NAMELIST  variable  input. 

(2)  The  second  data  card  contains  the  plot  numbers  of 
the  data  to  be  skipped.  The  format  for  the  data 
card  is  shown  in  Figure  73.  The  data  card  can 
contain  up  to  twenty  plot  numbers,  each  right- 

justified  integer  in  one  of  the  3-character  fields 
in  the  first  sixty  columns  of  the  card.  These 

numbers  can  be  in  any  order  and  do  not  need  to  fill 
consecutive  fields.  If  the  card  is  left  blank,  no 
plot  will  be  skipped. 

Figure  74  shows  an  Off-Line  plot  of  the  man-model  with 
full  skeletal  link  system  and  a  crew  station,  as  it  appears  on 

the  CRT.  The  plot  banner  shown  in  Figure  75  indicates  that  the 

plot  is  a  perspective  plot  with  scale  factor  0.85.  The  data 

card  input  for  this  plot  is  shown  in  Figure  76.  Notice  that 
all  values  except  ICOLOR(3)  and  ICOLOR(4)  remain  at  their 
default  values  in  the  NAMELIST/CNTRL/.  This  implies  that  the 

scale  factor  for  the  plot  is  the  one  specified  during  the 

COMBIMAN  run  when  the  plot  data  were  generated.  The  link  sys¬ 
tem,  enfleshment,  and  crew  station  as  displayed  on  the  CRT  are 
included  in  the  plot.  Since  both  ICOLOR(3)  and  ICOLOR(4)  are 

^The  $  symbol  Is  used  while  executing  the  program  on  a 
CDC  computer:  other  computers  may  have  different  symbols 
for  this  purpose. 
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Figure  74.  COMB I MAN  OFF-LINE  Plot. 
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Figure  75.  Plot  Banner  for  the  Plot  Shown  in  Figure  74. 


165 


Figure  77.  Card  Input  for  Figure  78. 


set  equal  to  1  in  the  input,  all  elements  of  the  plot  will  be 
of  the  same  color  (in  this  case  black).  Also  notice  that  the 
second  input  card  contains  a  "1"  in  column  six  denoting  that 
plot  number  1  is  to  be  skipped.  The  plot  shown  in  Figure  74  is 
plot  number  "2"  as  indicated  in  Figure  75. 

Figure  77  shows  the  input  cards  used  to  generate  Figure  78 
from  the  same  plot  data.  FACTR=0.55  resets  the  plot  scale  fac¬ 
tor  to  0.55,  FLESH=1  deletes  all  enfleshment  from  the  man- 
model,  and  the  color  of  all  plot  elements  is  again  black. 


3.2  PROGRAM  MESSAGES- INFORMATION  AND  ERROR  TYPE 

The  program  CBMOFF  prints  both  information  and  action  re¬ 
lated  messages.  The  message  format  is  as  follows: 


CBM2nni 

where: 

CBM 


2 


nn 

i 


message  text 


message  text 


identifies  the  message  and  indicates 
that  the  message  originates  from  COMBI- 
MAN  system 

identifies  the  message  and  indicates 
that  the  message  originates  from  the 
program  CBMOFF 

is  the  message  number 

indicates  the  action  code  (^Informa¬ 
tional,  A=Action  to  be  performed),  and 

is  the  text  of  the  message 


CBM201I  PLOT  SET  plotnumber  WAS  NOT  PLOTTED  --  BY  REQUEST. 

Reason:  User  requested  that  plot  plotnumber 

not  be  plotted. 

System  Action:  Plot  plotnumber  is  not  plotted. 

User  Action:  None. 
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Figure  78.  Altered  COMBIMAN  OFF-LINE  Plot 


CBM202A 


CBM203I 


INCORRECT  AMOUNT  OF  DATA  FOR  PLOT  plotnumber  -- 
PROGRAM  ENDING. 

Reason:  There  were  too  much  or  too  little 

data  on  file  for  plot  plotnumber . 
System  Action:  No  plotting  occurs,  and  program  ends. 
User  Action:  Recreate  plot  file. 

SCALE  FACTOR  CHANGED  FROM  factorl  TO  factor2. 

Reason:  User  input  a  value  for  FACTR 

(factor2)  in  the  namelist  CNTRL . 
System  Action:  factor 2  is  used  to  scale  the  plot. 
User  Action:  None. 
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SECTION  4 

COMBIMAN  ANTHROPOMETRIC  DATA  BASE  MAINTENANCE 
PROGRAM  (CBMAM) 


In  order  to  generate  an  accurate  and  sophisticated  man- 

model  like  the  one  in  COMBIMAN,  the  user  is  often  requested  to 
supply  a  lot  of  anthropometric  data.  To  simplify  this  task,  a 
Data  Base  is  constructed  to  store  key  data  items.  This  Data 

Base  resides  on  a  direct-access  disk,  and  contains  anthropo¬ 

metric  survey  and  regression  data  which  are  relevant  to 
generate  the  man-model. 

The  information  on  the  Data  Base  is  organized  into  groups 
of  related  records  called  members.  Members  may  be  either 
regression  data,  or  anthropometric  survey  data.  Data  for  sur¬ 
vey  members  are  generally  subsets  of  existing  anthropometric 
surveys  in  the  AFAMRL  Anthropometric  Data  Bank.  In  order  to 
add  a  new  anthropometric  survey  to  the  Data  Base,  the  key  in¬ 
formation  needed  includes  the  mean  and  standard  deviation  for 
each  anthropometric  variable  and  a  set  of  correlation  coeffi¬ 

cients  for  all  the  relevant  variables  of  the  survey. 


4.1  AVAILABLE  PROCESSING 

The  program  CBMAM  (COMBIMAN  Anthropometric  Data  Base  Main¬ 
tenance  Program)  allows  the  user  to  create  and  maintain  the 
Anthropometric  Data  Base.  The  user  supplies  the  input  data  on 
80  character  computer  cards  or  in  card  image  format  on  magnetic 
tape.  The  program  CBMAM  reads  and  processes  the  data  in  ac¬ 
cordance  with  the  selection  of  control  commands  by  the  user. 
These  commands  allow  the  user  to  add  members  to  the  Data  Base, 
to  delete  members  from  the  Data  Base,  to  print  or  punch  exist¬ 
ing  members,  to  list  the  directory  of  the  Data  Base,  or  to  com¬ 
press  the  data  on  the  file  to  combine  unused  space.  The  data 
flow  of  the  program  is  shown  in  Figure  79. 
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Figure  79.  Data  Flow  for  Program  CBMAM. 
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The  Anthropometric  Data  Base  is  made  up  of  two  types  of 


related  data.  One  type  consists  of  regression  data  which  is 
used  by  the  interactive  graphics  program  CBM05  to  compute  the 
anthropometric  surface  dimensions  needed  to  generate  the  link 
system  of  the  man-model.  The  second  type  consists  of  survey 
data  which  define  the  means,  standard  deviations,  and  percen¬ 
tiles  for  each  variable  for  a  particular  survey.  Each  group  of 
data,  whether  dealing  with  regression  or  survey  information,  is 
called  an  anthropometric  member,  and  is  referenced  by  its  mem¬ 
ber  name  and  type  classification. 


4.2  RESTRICTIONS  AND  LIMITATIONS 

The  Anthropometric  Data  Base  may  contain  up  to  a  maximum 
of  20  members  consisting  of  regression  and  survey  types.  The 
number  of  records  for  each  member  need  not  be  the  same  and  the 
sum  of  the  record  counts  for  all  the  members  cannot  exceed 
1979.  Information  on  the  number  of  members  on  the  Data  Base 
and  their  sizes  is  obtained  by  using  the  " +PRT "  control  com¬ 
mand  as  explained  in  detail  in  Paragraph  4. 3. 2. 9 

Additional  limitations  on  the  number  of  variables  and 
related  data  are  explained  in  Paragraph  4.3.2.  Members  to  be 
added  should  have  unique  membernames.  If  the  new  member  name 
matches  with  any  name  in  the  directory,  the  member  will  not  be 
added . 


4.3  HOW  TO  USE  PROGRAM  CBMAM 

The  surveys  used  in  COMBIMAN  are  subsets  of  1967  Survey  of 
the  USAF  Flying  Personnel  (Churchill,  et  al,  1976  ),  the  1970 
Survey  of  the  U.S.  Army  Aviators  (Churchill,  et  al,  1971),  the 
1968  Air  Force  Women,  and  the  1964  U.S.  Navy  Flyers.  As  new 
surveys  become  available,  or  subsets  of  existing  surveys  in  the 
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AFAMRL  Data  Bank  become  needed,  the  program  CBMAM  is  used  to 
add  these  new  members.  In  most  cases,  each  new  survey  type 
member  has  a  corresponding  regression  type  member  which  con¬ 
tains  multiple  and  single  regression  equation  coefficients  to 
predict  additional  anthropometric  variables  from  those  speci¬ 
fied  by  the  user.  In  a  few  cases,  one  regression  type  member 
may  be  referenced  by  several  survey  type  members.  These  are 
special  cases  and  this  practice  should  not  be  used  regularly 
without  first  consulting  with  personnel  in  the  Workload  and 
Ergonomics  Branch  of  the  Air  Force  Aerospace  Medical  Research 
Lab,  Wr ight-Patter son  Air  Force  Base,  Ohio  to  verify  the  sta¬ 
tistical  accuracy  of  the  regression  data  of  the  anthropometric 
survey  in  question. 

All  examples  illustrating  the  use  of  CBMAM  will  be  based 
on  the  1967  USAF  Flying  Personnel  survey  and  its  regression 
member  R67  USAF. 

4.3.1  Input  Data  Specification 

The  nucleus  of  the  anthropometric  variables  con¬ 
sidered  for  input  as  part  of  any  anthropometric  survey  member 
is  the  12  variables  required  to  generate  the  35  internal  link 
lengths  of  the  man-model  skeletal  system.  The  names  of  these 
variables  and  their  abbreviated  16  character  names,  where  ap¬ 
plicable,  are  listed  in  Table  5.  Very  few  COMBIMAN  users  will 
have  specific  values  to  input  for  each  of  the  12  variables.  In 
oraer  to  accommodate  this,  we  have  selected  additional  anthro¬ 
pometric  variables  which  are  found  to  be  good  predictors  of 
either  body  segment  mass  or  body  segment  length,  and  have  mod¬ 
erately  high  correlations  with  the  12  required  variables.  The 
variables  chosen  to  predict  mass  and  length  related  variables 
for  the  1967  Survey  are  shown  in  the  appropriate  columns  of 
Table  6.  The  variables  in  Table  6  which  are  both  predictors 
ana  required  dependent  dimensions  are  marked  with  an  asterisk. 
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TABLE  5 


LIST  OF  DEPENDENT  VARIABLES  NEEDED  TO  GENERATE 
COMBIMAN  LINK  SYSTEM 


16  Character  Abbreviation 
Name  _ (If  Applicable) _ 


1 . 

Weight 

2. 

Sitting  Height 

3. 

Acromion  Height,  Sitting 

(ACROMION  HGT/SIT) 

4. 

Knee  Height,  Sitting 

(KNEE  HGT/ SITTING) 

5. 

Buttock-Knee  Length 

( BUTTOCK-KNE  LGTH) 

6. 

Shoulder-Elbow  Length 

( SHOULDR-ELB  LGTH) 

7. 

Biacromial  Breadth 

(BIACROMIAL  BRDTH) 

8. 

Hip  Breadth 

9. 

Chest  Depth 

10. 

Foot  Length 

11. 

Hand  Length 

12  . 

Elbow-Wrist  Length 

(ELBOW-WRIST  LGTH) 

TABLE  6 

LIST  OF  DEPENDENT  VARIABLE  PREDICTORS 


Mass  Related 

Length  Related 

1. 

*Weight 

1. 

*Sitting  Height 

2. 

Bideltoid  Breadth 

2. 

Eye  Height,  Sitting 

3. 

Hip  Breadth,  Sitting 

3. 

*Knee  Height,  Sitting 

4. 

*Chest  Depth 

4. 

*Buttock-Knee  Length 

5. 

Elbow-Grip  Length 

6  . 

Thumb-Tip  Reach 

*Predictors  and  required  dependent  variables. 
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To  generate  the  man-model  the  user  may  also  select 
one  mass  related  and  one  length  related  variables  from  Table  6 
and  supply  their  values.  The  values  for  all  the  12  variables 
in  Table  5  are  computed  using  the  regression  equations  from  the 
Anthropometric  Data  Base. 

In  order  to  create  an  anthropometric  survey  mem¬ 
ber,  first  a  set  of  variables  based  on  availability  and  neces¬ 
sity  has  to  be  established.  Once  the  complete  set  of  variables 
is  established,  the  means,  standard  deviations,  percentiles, 
and  correlation  coefficients  for  each  variable  of  the  particu¬ 
lar  survey  may  be  obtained  from  the  AFAMRL  Anthropometric  Data 
Bank.  The  set  of  variables  used  for  the  1967  Survey  is  shown 
in  Table  7.  A  sample  data  obtained  for  Weight  are  shown  in 
Figure  80. 


The  coefficients  used  in  the  regression  equations 
are  based  on  means,  standard  deviations  and  correlation  coeffi¬ 
cient  for  each  variable,  and  on  the  equations  which  were  devel¬ 
oped  in  WADD-TR-60-31 ,  pages  69-70  (Zeigen,  et  al,  1960). 
Tables  8  and  9  show  the  elements  of  the  correlation  coefficient 
matrices  used  in  calculating  the  regression  coefficients.  The 
means,  standard  deviations,  and  correlation  coefficients  for 
1967  USAF  survey  are  available  in  AMRL-TR-77-2  (Churchill,  et 
al,  1978). 


The  total  number  of  multiple  regression  equations 
(NR)  needed  for  a  particular  survey  is  calculated  using  the 
following  equation: 

NR  =  (NM  X  NL)  X  ND  (1) 

where  NM  is  the  number  of  variables  related  to  body  segment 

mass,  NL  is  the  number  of  variables  related  to  body  segment 

length,  and  ND  is  the  number  of  dependent  variables.  For  1967 
Survey,  each  of  the  24  combinations  of  mass-langth-related 
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TABLE  7 


LIST  OF  ANTHROPOMETRIC  DIMENSIONS 
AVAILABLE  IN  THE  ANTHROPOMETRIC  DATA  BASE 


1.  Weight 

2.  Sitting  Height 

3.  Eye  Height,  Sitting 

4.  Acromion  Height,  Sitting 

5.  Knee  Height,  Sitting 

6.  Buttock-Knee  Length 

7 .  Shoulder-Elbow  Length 

8 .  Elbow-Grip  Length 

9 .  Thumb-Tip  Reach 

10 .  Biacromial  Breadth 

11.  Bideltoid  Breadth 

12.  Hip  Breadth 

13.  Hip  Breadth,  Sitting 

14 .  Chest  Depth 

15.  Foot  Length 

16.  Hand  Length 

17.  Elbow-Wrist  Length 
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MATRIX  OF  CORRELATION  COEFFICIENTS  BETWEEN 
MASS  AND  LENGTH  RELATED  VARIABLES  (CHURCHILL,  ET  AL,  1976) 
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DEPENDENT  AND  INDEPENDENT  VARIABLES  (CHURCHILL,  ET  AL,  1976) 
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dimensions  has  its  own  set  of  12  multiple  regression  equations 
to  compute  the  surface  dimensions  required  to  generate  the 
man-model.  In  addition  to  the  multiple  regression  coeffi¬ 
cients,  simple  regression  coefficients  and  associated  standard 
error  of  estimates  are  available  for  each  of  the  24  combi¬ 
nations.  Note  that  the  standard  units  of  measurement  for  all 
variables  used  in  COMBIMAN  are  pounds  ana  inches,  but  there  are 
provisions  to  change  these  into  metric  units. 

4.3.2  Processing  Specification 

Tne  Anthropometric  Data  Base  Maintenance  program, 
CBMAM,  allows  the  user  to  create  and  maintain  the  Anthropo¬ 
metric  Data  Base.  The  Data  Base  contains  regression  data  which 
are  used  by  the  interactive  graphics  program  CBM05  to  predict 
anthropometric  surface  dimensions  needed  to  generate  the  link 
system  of  the  man-moael.  It  also  contains  survey  data  which 
define  the  means,  standard  deviations,  and  percentiles  for 
every  aefined  variable  for  a  particular  anthropometric  survey. 
Each  group  of  data,  whether  dealing  with  regression  or  survey 
information,  is  called  an  anthropometric  member,  ana  is  refer¬ 
enced  by  its  member  name  and  type  classification. 

The  program  CBMAM  allows  the  user  to  maintain  the 
Data  Base  by  adding,  deleting,  listing,  etc.,  the  member  types 
through  input  control  cards  as  shown  in  Figure  81. 

These  control  cards  may  be  placed  in  any  order  in 
the  input  stream  of  the  program,  with  one  exception.  If  the 
Data  Base  is  initialized  for  the  first  time,  the  +INT  control 
cara  must  be  the  first  data  card.  In  the  following  paragraphs, 
the  control  cards  format  of  the  function  is  listea  first.  This 
is  followed  by  the  text  which  explains  each  keyword.  Addition¬ 
al  data  formats,  if  any,  are  then  described  for  each  function. 
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4. 3. 2.1  ADD  ANTHROPOMETRIC  MEMBER  Function 


+ADD  membername  type  nvbl  ncmb  ndep 

regr name  (followed  by  member  definition) 

Tne  ADD  ANTHROPOMETRIC  MEMBER  function, 
as  defined  by  the  +ADD  control  card  and  the  member  definition 
cards  which  follow,  adds  to  the  Anthropometric  Data  Base  speci¬ 
fied  data  under  the  name  membername .  The  membername  is  an 
alphanumeric  character  string,  whose  length  is  limited  to  16 
characters.  The  type  field  distinguishes  between  the  two  types 
of  members.  A  type  value  of  "0"  indicates  that  the  member  con¬ 
tains  regression  information,  while  a  type  value  of  "1"  indi¬ 
cates  that  the  member  contains  survey  dimension  data.  The  type 
value,  as  well  as  all  other  integer  values  supplied  on  the  con¬ 
trol  card,  must  be  r ight- justified  within  its  field.  The  nvbl 
field  defines  the  total  number  of  variables  described  in  member 
membername.  The  maximum  number  is  45.  The  ncmb  field  indi¬ 
cates  the  maximum  number  of  combinations  of  independent  mass 
anu  lengtn  variables.  The  maximum  number  is  50.  The  number  of 
anthropometric  variables  needed  to  determine  the  internal  link 
lengths  is  supplied  in  field  ndep.  The  maximum  number  is  30. 
Fields,  npct  and  r  egrname  are  used  only  when  the  type  field 
value  is  1.  Npct  contains  the  number  of  percentile  values 
which  will  be  supplied  for  every  one  of  the  nvbl  variables. 
The  maximum  value  for  npct  is  30.  The  regr name  field  refers  to 
the  type  0  member  name  which  contains  the  appropriate  regression 
information . 


4 . 3 . 2 . 2  TYPE  0  MEMBERS 

An  example  of  an  +ADD  control  card  for  a 
type  0  member  in  tne  1967  Survey  is  outlined  in  Figure  82.  The 
name  of  the  survey  member  is  R67  USAF,  and  it  contains  a  total 
of  17  variables,  with  24  combinations  of  independent  variables, 
and  121  combinations  of  dependent  variables.  An  example  of  a 
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Figure  83.  Example  of  +ADD  Control  Card  for  Type  1  Member. 


+ ADD  control  card  for  a  type  1  member  is  outlined  in  Figure 
83.  The  number  of  percentiles  for  each  variable  of  survey 
member  67  USAF  is  25,  and  the  referenced  regression  type  member 
is  R67  USAF.  Note  that  the  values  for  nvbl ,  ncmb,  and  ndep  are 
identical  to  the  type  0  member  R67  USAF,  shown  in  Figure  82. 

Figures  84,  85,  and  86  shows  the  record 

formats  used  for  type  0  members  in  the  data  base.  The  data 
provided  in  the  format  shown  in  Figure  84  define  anthropo¬ 
metric  variables  used  in  the  regression  member.  Columns  1-2 
contain  a  sequence  number  for  the  variable,  right- justif ied  in 
the  field.  Columns  4-19  contain  the  16-character  name  of  the 
anthropometric  variable.  Columns  21-22  contain  a  two-character 
abbreviation  for  the  default  unit  of  measurement  of  the  vari¬ 
able.  Approved  abbreviations  are  IN,  CM,  MM,  LB,  and  KG  for 
inches,  centimeters,  millimeters,  pounds,  and  kilograms,  re¬ 
spectively.  A  "1"  punched  in  column  26,  30,  or  34,  indicates  a 
mass  related  independent  variable,  a  length  related  independent 
variable,  or  a  dependent  variable  necessary  to  generate  the 
link  lengths  respectively.  A  variable  can  either  be  indepen¬ 
dent  or  dependent,  as  in  the  case  of  sitting  height,  but  it 
cannot  pertain  to  both  mass  and  length.  If  all  three  fields 

are  blank,  the  data  card  is  flagged  to  indicate  an  error.  As 

each  variable  definition  card  is  read  in,  the  program  checks 
the  use  of  the  variable  and  records  its  status. 

The  first  outlined  area  of  Figure  87  is 

an  example  of  a  Variable  Definition  Card.  A  "1"  is  punched  in 
columns  30  and  34  to  indicate  that  the  Sitting  Height  is  both 
an  independent  variable  related  to  body  segment  length  and  a 

dependent  variable. 

Two  types  of  record  formats  are  used  for 
combinations  of  mass  and  length  related  independent  variables 
as  shown  in  Figures  85  and  86.  In  Figure  85,  the  variable 
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Figure  86.  Program  CBMAM  Regression  Member  Multiple  Regression  Coefficient 
Definition  Card. 
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Figure  87. 


Example  of  Regression,  or  Type  0  Member. 
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numbers,  punched  in  columns  1-3  and  4-6  are  obtained  from  col¬ 
umns  1-2  of  the  variable  definition  cards  as  shown  in  Figure 
84.  Columns  11-40  contain  simple  regression  information  neces¬ 
sary  to  predict  tne  length  related  variable  from  the  mass  re¬ 
lated  variables.  This  information  includes  the  slope  and  con¬ 
stant  in  the  regression  formula: 

Y  =  bX  +  c  (2) 


where : 


b  is  the  slope  and 
c  is  the  intercept. 

It  also  contains  the  standard  error  of  estimate  associated  with 
the  equation.  Columns  41-70  contain  similar  data  to  predict 
mass  from  the  length  variable. 

The  regression  data  used  in  the  follow¬ 
ing  examples  are  unpublished  data  provided  by  the  USAF.  These 
data  contain  the  slope,  intercept,  and  standard  error  in  metric 
units.  The  coefficients  are  multiplied  by  appropriate  factors 
to  convert  them  to  the  English  units  specified  on  the  Variable 
Definition  Card.  The  regression  equation  to  predict  sitting 
height  in  inches  from  weight  in  pounds  is: 

Estimated  Sitting  Height  =  0.02669  x  Actual  Weight  +  32.05275 
(Variable  #2)  (Variable  #1) 

(1) 


The  standard  error  is  1.11161. 


186 


The  equation  to  predict  weight  in  pounds  from  sitting  height  in 
inches  is: 


Estimated  Weight  =  7.84538  x  Actual  Sitting  Height  -  114.20831 

(2) 


The  standard  error  is  19.05910. 

In  Figure  87  (2) ,  the  "1"  in  column  3  identifies  Weight  as  the 
mass  related  variable,  and  the  "2"  in  column  6  identifies  Sit¬ 
ting  Height  as  the  length  related  variable.  The  regression 
coefficients  for  equations  (1)  ana  (2)  are  punched  in  the  re¬ 
mainder  of  the  card. 


The  second  record  format  is  shown  in 
Figure  86  and  contains  the  multiple  regression  information 
necessary  to  predict  each  dependent  variable  from  the  partic¬ 
ular  combination  of  mass  and  length  related  variables.  Columns 
1-3  contain  the  independent  mass  variable  number;  columns  4-6 
the  independent  length  variable  number;  and  columns  7-9  the 
dependent  variable  number.  Each  integer  value  must  be  right- 
justified.  Columns  11-20  contain  the  slope  associated  with  the 
mass  variable  value  (b^) ;  columns  21-30  the  slope  for  the 
length  variable  value  (b^) ;  and  columns  31-40  the  constant  of 
the  equation  (c)  .  The  equation  to  predict  the  value  y  of  a 
dependent  variable  is  of  the  form: 

Y  =  b 1x]_  +  b2X2  +  c  (3) 

where: 

# 

X^  is  the  value  of  mass  related  variable  and 

X2  is  the  value  of  length  related  variable* 
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The  data  for  this  card  are  derived  from 
the  correlation  matrices  shown  in  Tables  8  and  9,  and  from  the 
equations  in  Zeigen,  et  al,  (1960).  Since  it  is  undesirable  to 
have  the  length  related  variables  to  depend  on  the  value  chosen 
for  the  mass  related  variable,  the  multiple  regression  equa¬ 
tions  are  replaced  by  single  regression  equations.  As  an  ex¬ 
ample,  the  multiple  regression  equation  to  predict  Knee 
Height/Sitting  from  Weight  and  Sitting  Height  is  replaced  by  a 
single  regression  equation  as  follows: 

Knee  Height/Sitting  =  0.0  x  Weight  (Variable  #1) 

+  0.404000  x  Sitting  Height  (Variable  #2) 

+  7.133844 

The  third  outlined  area  of  Figure  87  shows  the  data  for  this 
example.  A  "1"  in  column  3  identifies  Weight  as  the  mass  vari¬ 
able;  a  "2"  in  column  6  identifies  Sitting  Height  as  the  length 
variable;  and  a  "5"  in  column  9  identifies  Knee  Height/Sitting 
as  the  dependent  variable.  The  regression  coefficients  are 
punched  in  the  remainder  of  the  card. 

The  multiple  regression  equations  are 
retained  for  predicting  the  mass-related  variables.  As  an  ex¬ 
ample,  the  multiple  regression  equation  to  predict  Hip  Breadth 
from  Weight  and  Sitting  Height  is  as  follows: 

Hip  Breadth  =  0.0279173  x  Weight  (Variable  #1) 

+  0.0043000  x  Sitting  Height  (Variable  #2) 

+8.87957 

The  fourth  outlined  area  of  Figure  87 
shows  the  data  for  this  example.  A  "1"  in  column  3  identifies 
Weight  as  the  mass  variable;  a  "2"  in  column  6  identifies  Sit¬ 
ting  Height  as  the  length  variable;  and  a  "12"  in  columns  8  and 
9  identifies  Hip  Breadth  as  the  dependent  variable.  The  re¬ 
gression  coefficients  are  punched  in  the  remainder  of  the  card. 
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If  the  number  of  multiple  regression 
coefficient  definition  data  cards  is  not  equal  to  (ncmb  x  ndep) 
the  member  is  not  added  to  the  Anthropometric  Data  Base. 

4. 3. 2. 3  TYPE  1  MEMBERS 

For  type  1  members  on  the  Data  Base,  the 
record  formats  are  shown  in  Figures  88  and  89.  The  input  data 
in  the  format  shown  in  Figure  88  define  the  percentile  names 
for  which  values  are  supplied  in  succeeding  cards.  Figure  90 
shows  the  percentile  names  for  the  1967  USAF  Survey.  The  25 
percentile  values  available  for  this  survey  include  the  1st, 
2nd,  3rd,  5th,  and  are  punched  in  two-digit  integer  fields, 
right- justif ied  within  the  area.  The  number  of  percentiles 
supplied  must  be  equal  to  the  value  in  the  npct  field  of  the 
+ADD  (type  1)  control  card,  otherwise  an  error  message  is 
printed  and  the  member  is  not  added.  Note  that  the  maximum 

number  of  percentiles  allowed  is  30. 

Figure  89  shows  the  format  used  in  as¬ 

signing  dimensional  values  to  the  variables.  The  variable 
number  in  integer  format  is  in  columns  1-2  while  columns  4-19 
contain  the  16-character  variable  name.  Columns  21-22  contain 
the  two  character  abbreviation  for  the  default  unit  of  measure¬ 
ment.  At  present  the  default  or  standard  unit  for  weight  is 
pounds,  and  the  standard  unit  for  all  other  measurements  is 

inches.  For  each  variable  number,  the  variable  name  and  unit 
of  measurement  must  correspond  with  the  same  fields  in  the 
reference  type  0  or  regression  member.  Columns  23-32  contain 
the  overall  mean  for  the  named  variable  expressed  in  the  de¬ 

fault  unit  of  measurement.  Columns  33-42  contain  the  standard 
deviation.  Columns  43-72  of  this  data  card  and  columns  1-70  of 
additional  cards  necessary  to  input  data  contain  the  values  for 
each  of  the  percentiles  named.  If  the  number  of  percentile 
values  does  not  correspond  to  the  value  of  npct ,  an  error 
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Figure  89.  Program  CBMAM  Survey  Member  Dimension  Definition  Cards. 
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condition  occurs  and  the  member  is  not  added  to  the  Data  Base. 
The  period  in  the  fields  in  Figures  88  and  89  indicates  the 
standard  or  default  location  of  the  decimal  point  in  real 
number  format. 

The  dimension  data  needed  in  this  card 
are  also  obtained  from  the  Summary  Statistics  of  the  1967 
Survey  (Churchill  et  al,  1976).  A  sample  set  of  the  data  for 
Weight  is  shown  in  Figure  80.  The  mean  value  of  Weight, 
173.60686  lbs,  the  standard  deviation,  21.434704,  and  the 
weights  associated  with  the  first  six  percentiles,  namely  the 
1st,  2nd,  3rd,  5th,  10th,  and  15th  are  punched  on  the  third 
card  shown  in  Figure  90.  The  weight  values  for  the  percentiles 
ranging  from  20th  to  85th,  and  from  90th  to  99th,  are  punched 
in  the  last  card.  It  is  essential  that  users  enter  a  type  0 
member  into  the  Data  Base  prior  to  adding  the  associated  type  1 
member,  since  the  type  1  member  references  the  type  0  member. 

4. 3. 2.  4  CHECK  ANTHROPOMETRIC  MEMBER  Function 

+CHK  membername  type  nvbl  ncmb,  ndep 

npct  regr  name 

The  CHECK  ANTHROPOMETRIC  MEMBER  function 
operates  the  same  way  the  ADD  ANTHROPOMETRIC  MEMBER  function. 
However,  the  member  is  not  added  but  the  data  are  checked  for 
errors . 


4. 3. 2. 5  DELETE  ANTHROPOMETRIC  MEMBER  Function 

+DEL  membername  type 

The  DELETE  ANTHROPOMETRIC  MEMBER  func¬ 
tion  removes  the  specified  member  from  the  Data  Base,  but  does 
not  make  the  space  occupied  by  the  member  available  for  reuse. 
The  +CMP  function  must  be  used  to  accomplish  this. 
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4. 3. 2. 6  COMPRESS  ANTHROPOMETRIC  DATA  BASE 

Function 

+CMP 

The  COMPRESS  ANTHROPOMETRIC  DATA  BASE 
function  makes  space  available  for  storing  anthropometric  data 
by  compressing  used  space  together  and  maximizing  the  amount  of 
continuous  unused  space  on  the  Data  Base.  The  intermediate 
blocks  of  unused  space  are  created  by  the  DELETE  ANTHROPOMETRIC 
MEMBER  function.  The  greater  the  activity  of  the  Anthropometric 
Data  Base  (ie.,  +ADD's  and  +DEL's),  the  more  often  it  becomes 
necessary  to  use  this  +CMP  function.  If  the  message  "CBM310A 
INSUFFICIENT  SPACE  REMAINING  TO  ADD  MEMBER  membername"  appears 
while  adding  a  member,  it  becomes  necessary  to  use  the  +CMP 
function.  If  the  +ADD  function  gives  the  CBM310A  message  imme¬ 
diately  following  the  +CMP  function,  the  Data  Base  is  full  and 
no  new  members  can  be  added  until  an  existing  member  is  deleted 
from  the  Data  Base. 

4. 3. 2. 7  DUMP  ANTHROPOMETRIC  MEMBER  Function 

+DMP  membe rname  type 

+DMP 

The  DUMP  ANTHROPOMETRIC  MEMBER  function 
prints  the  contents  of  the  anthropometric  member  membername  of 
specified  type ,  or  prints  the  complete  Anthropometric  Data  Base 
if  no  member  name  is  given  on  the  control  card.  This  function 
is  used  primarily  by  system  programmers  to  check  the  contents 
of  the  file. 


4. 3. 2. 8  END  PROGRAM  Function 

+END 

The  END  PROGRAM  function  control  card 
terminates  execution  of  the  program  CBMAM  and  returns  control 
to  the  operating  system. 
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4. 3. 2. 9  INITIALIZE  ANTHROPOMETRIC  DATA  BASE 

Funct ion 

+  INT 

The  INITIALIZE  ANTHROPOMETRIC  DATA  BASE 
function  initializes  an  Anthropometric  Data  Base  or  resets  an 
existing  Anthropometric  Data  Base  to  its  original  unused 
state.  All  members  residing  on  the  Data  Base  before  invoking 
this  function  are  purged  and  the  entire  space  is  made  available 
for  new  members.  However,  the  primary  purpose  of  this  function 
is  to  establish  an  Anthropometric  Data  Base. 

4.3.2.10  PUNCH  ANTHROPOMETRIC  MEMBER  Function 

+PCH  member  name  type 

The  PUNCH  ANTHROPOMETRIC  MEMBER  function 
punches  a  copy  of  the  specified  member  in  the  same  format  as 
the  ADD  ANTHROPOMETRIC  MEMBER  function  input  data  for  the 
specified  type  onto  computer  cards.  If  the  user  specifies  a 
member  name  that  does  not  exist  on  the  directory,  all  the  mem¬ 
ber  names  on  the  Data  Base  directory  are  printed  out.  This 
function  does  not  add  or  remove  any  member  from  the  Data  Base. 

4.3.2.11  PRINT  ANTHROPOMETRIC  MEMBER  Function 

+PRT  member  name  type 

+PRT 

The  PRINT  ANTHROPOMETRIC  MEMBER  function 
prints  the  contents  of  the  specified  member  ,  member  name  ,  of 
type,  type  ,  in  a  format  similar  to  that  used  in  the  ADD  ANTHRO¬ 
POMETRIC  MEMBER  function.  If  no  name  is  specified,  or  if  a 
name  that  is  not  in  the  Data  Base  directory  is  specified,  names 
of  all  members  in  the  Data  Base  directory,  the  number  of  rec¬ 
ords  for  each  member,  their  types,  and  any  additional  data 
supplied  on  the  +ADD  control  card  when  the  members  were  added 
to  the  Data  Base  are  printed. 
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4.3.3  Submitting  a  Processing  Request 


The  set  of  JCL  used  at  HESS  facility  to  run  the 
program  CBMAM  is  shown  in  Figure  91.  Use  of  the  //FT02F001  DD 
card  as  shown  in  Figure  91  assumes  that  the  space  for  the  Data 
Base  has  already  been  allocated  and  catalogued.  If  for  some 
reason  this  condition  is  not  met,  the  //FT02F001  DD  card  in 
Figure  91  should  be  replaced  by  the  card  sequence  (3  cards) 
shown  in  Figure  92.  The  job  is  run  with  this  replacement  se¬ 
ries  once  to  allocate  space  for  the  data  set  (file)  on  disk, 
and  to  catalogue  the  file.  Thereafter  the  simplified 
//FT02F001  DD  card  shown  in  Figure  91  is  used  to  maintain  the 
Data  Base. 


If  the  file  has  just  been  created,  or  if  the  user 
wants  to  reinitialize  the  file,  the  +INT  control  function  is 
used  before  any  other  control  function. 

The  last  control  card  read  into  the  program  should 
be  the  +END  control  card. 

4.3.4  Output  Data  Interpretation 

The  program  CBMAM  generates  output  to  the  card 
punch,  to  the  disk  file,  or  to  the  printer  depending  on  the 
function  specified  on  the  control  card.  The  formats  for  the 
printed  output  are  discussed  in  this  section.  Punched  records 
use  the  same  format  as  the  input  data  records  discussed  in 
Paragraph  4.3.2. 

Five  basic  types  of  formats  are  used  by  CBMAM  when 
data  are  written  on  the  printer.  These  format  types,  their 
use,  and  sample  outputs  are  presented  in  the  following 
paragraphs.  Each  type  begins  with  the  same  heading,  listing 
the  program  name,  CBMAM,  the  date  and  time  of  the  program 
execution,  and  a  page  number. 
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Figure  92.  FT02  DD  Card  to  Allocate  Space  for  COMBIMAN . ANTHDTA 
and  Execute  CBMVM. 


The  first  type  of  output  is  generated  by  the 
INITIALIZE,  PUNCH,  COMPRESS,  DELETE,  and  END  functions.  The 
output  indicates  the  beginning  and  end  of  processing  associated 
with  the  specified  function.  For  the  COMPRESS  function,  addi¬ 
tional  messages  which  indicate  that  a  particular  member  is  or 
is  not  moved  in  the  process  of  compressing  used  space  are 
printed.  An  example  of  this  format  for  the  COMPRESS  function 
is  shown  in  Figure  93. 

The  second  type  of  output  is  generated  by  the 
PRINT  or  PUNCH  functions  when  the  +PRT  or  +PCH  control  cards 
are  supplied  with  a  blank  member  name  field.  This  causes  the 
program  to  list  the  index  of  the  Data  Base,  which  contains  the 
location  and  type  of  each  member.  This  information  is  printed 
in  the  following  format: 

nn. )  membername,  EXTENT  =  (nl,  n2),  TYPE  =  tt , 

nv  VARIABLES,  nc  COMB  OF  INDEP ,  nd  DEPENDENT, 
np  PERCENTILES,  r -membername  referenced  survey. 

where : 

nn  is  the  record  number  of  its  identifica¬ 

tion  record  within  the  directory. 

nl  is  the  location  of  the  first  record  of 

the  data  which  defines  this  member. 

n2  is  the  location  of  the  last  record  of 

the  data  which  defines  this  member. 

tt  is  the  type  code  (0  or  1) . 

nv  is  the  total  number  of  anthropometric 

variables  defined  for  the  member. 

nc  is  the  number  of  combination  of  inde¬ 

pendent  variables. 

nd  is  the  number  of  dependent  variables. 

np  is  the  number  of  percentiles.  Note: 

np=0  if  tt  =  0 . 

r-membername  is  the  name  of  the  referenced  regression 

member.  Note:  r-membername  is  blank  if 
tt=0  . 
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This 

Data  Base  on  the 
PRINT  function  is 


information  was  originally  supplied 
+ADD  control  card.  A  sample  output 
shown  in  Figure  94. 


to 

of 


the 

the 


The  third  type  of  output  is  generated  by  the  DUMP 
ANTHROPOMETRIC  DATA  BASE  function.  This  function  is  used  pri¬ 
marily  by  systems  programmers  to  locate  causes  of  I/O  (In¬ 
put/Output)  errors  on  the  Data  Base.  For  the  member  specified 
on  the  +DMP  Control  Cara,  a  directory  or  index  information  is 
printed,  using  the  output  format  previously  described  for  the 
+PRT  control  card.  Each  record  associated  with  the  member  is 
then  printed  in  the  following  format: 


RECORD  nnn  +  =  +  (record  in  EBCDIC)  +  =  + 

+  =  +  (record  in  hexadecimal)  +  =  + 

+  =  +  (remainder  of  record  in  hexadecimal)  +  =  + 


where  nnn  is  the  location  of  the  record  in  the  Data  Base.  The 
record  is  printed  in  EBCDIC  using  a  25A4  format  and  in  hexa¬ 
decimal  using  a  10Z8  format.  An  example  of  the  DUMP  function 
printout  is  shown  in  Figure  95. 


The  fourth  output  format  is  used  by  the  CHECK, 
ADD,  and  PRINT  runctions  when  a  type  £,  or  regression  member  is 
specified.  Tne  program  CBMAM  reads  the  control  card  and  checks 
it  for  errors,  and  the  information  obtained  from  the  control 
card  is  reformatted  and  written  out  to  the  printer.  Following 
the  control  card  information,  each  Variable  Definitioin  Card  is 
printed.  The  format  used  to  print  the  Variable  Definition  Card 
is  as  follows: 

nn.)  var iablename,  INDEP  VBLS  (MASS=ns,  LENGTH=ns) ,  DEP 
VBL=ns ,  UNIT  OF  M£ASUREMENT=uu 
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where : 


nn 

is  the  variable  number 

var iablename 

is  the  16  character  name  of  the 
variable 

ns 

0  means  NO;  1  means  Yes 

uu 

is  the  unit  of  measurement  assigned  to 
the  variable:  IN,  CM,  MM,  LB,  or  KG. 

After  the 

variable  definition  data,  the  regression 

data  for  each  combination  of  independent  variables  are  print¬ 
ed.  The  format  is  shown  in  Figure  96.  The  terms  are  defined 


as  follows: 

nl 

is  the  variable  number  for  the  mass- 
related  variable 

mass  name 

is  the  variable  name  for  the  mass- 
related  variable 

n2 

is  the  variable  number  tor  the  length- 
related  variable 

length  name 

is  the  variable  name  for  the  length- 
related  variable 

bb.bbb^,bb.bbb2 

is  the  slope  used  to  predict  (1) 

length  variable  from  mass  variable, 
and  (2)  mass  variable  from  length 

var iable 

CC.CCC;l,CC.CCC2 

is  the  constant  used  to  predict  (1) 
length  variable  from  mass  variable, 
and  (2)  mass  variable  from  length 

var iable 

SS.SSS1,SS.SSS2 

is  the  standard  error  of  the  estimate 
of  the  equations 

nc*l  -  nan(3ep 

are  the  variable  numbers  for  the  de¬ 
pendent  variables 

depname^  - 
depnamendep 

are  the  variable  names  for  the 
dependent  variables 

bb.bbbbj-  - 
bb . bbbbb^dep 

is  the  slope  for  the  mass  variable 
when  predicting  dependent  variable^, 
where  i=l,  ndep 
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bb. bbbbb 
bb. bbbbb 


is  the  slope  for  the  length  variable 
dep  when  predicting  dependent  variable^, 

where  i=l ,  ndep 

cc.ccccc^  -  is  the  constant  for  the  multiple 

cc.cccccndep  regression  equation  to  predict 

dependent  variable^,  where  i=l,  ndep. 

An  example  of  the  output  in  the  fourth  format  for 
the  +ADD  control  card  is  shown  in  Figure  97  and  98. 

The  fifth  output  format  is  also  used  by  the  CHECK, 
ADD  and  PRINT  functions,  but  only  when  the  type  code  is  1, 
indicating  a  survey  member.  The  program  CBMAM  reads  the  con¬ 
trol  card  and  checks  it  for  errors,  and  reformats  and  prints 
the  information  on  the  card  relevant  to  the  number  of  records 
written  to  the  Data  Base.  Following  the  control  card  informa¬ 
tion,  the  percentile  names  (such  as  1,  2,  3,  50,  95,  etc.)  for 

the  member  are  printed  as  part  of  a  subheading.  A  maximum  of 
10  percentile  names  are  printed  on  one  line.  The  survey  data 
are  then  printed  in  the  following  format: 

nn. )  var iablename  uu  mmm . mm  ss . sss  ppp. ppi  . . .  ppp.pp^Q 

ppp.pp-i  i  ...  ppp.pp?n 

PPP-PP21  ...  ££E^£Enpct 

where 

nn  is  the  variable  number 


var iablename 

is 

var 

the 

iable 

name  of 

the 

anthropometric 

uu 

is 

the 

specified 

unit 

of  measurement 

for  the  variable 

mmm. mm  is  the  mean  value  for  the  variable 

ss.sss  is  the  standard  deviation  for  the 

variable 

PPP.PPl-  are  the  percentile  values  associated 

ppp.ppnpct  with  the  percentile  names  for  the 

anthropometric  variables 

An  example  of  this  fifth  format  is  shown  in  Figure 


99. 
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Figure  97.  A  Sample  Output  of  the  +ADD  Function  for  Type  1  Member. 
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Figure  98.  A  Sample  Output  of  the  +ADD  Function  for  Type  1  Member. 
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Figure  99.  A  Sample  Output  of  the  +ADD  Function  for  Type  0  Member. 


4.4  PROGRAM  MESSAGES  INCLUDING  ERROR  CORRECTION 


The  program 
related  messages. 


CBMAM  prints 
The  message 


out  both 
format  is 


information 
as  follows: 


and 


action 


CBM3nni 


message  text 


where: 

nn  is  the  message  number 

i  identifies  the  action  code  (I=informa- 

tio.nal,  A=action  to  be  performed)  ,  and 

message  text  is  the  text  of  the  message. 

Unless  otherwise  noted,  all  messages  are  issued  by  the  routine 
CBMAM. 


CBM300I  Control  card  image  (e.g.  +ADD ,  +PRT,  etc.) 

Reason:  The  user  submitted  a  control  card. 

System  Action:  Continues  processing. 

User  Action:  None. 


CBM301A  Operation  -  UNKNOWN  OPERATION. 

Reason:  Tne  operation  on  the  control  card 

(shown  in  the  previous  CBM300I  Mes¬ 
sage)  is  unknown. 

System  Action:  The  control  card  is  ignored. 

User  Action:  Correct  card,  using  a  valid  opera¬ 

tion,  and  resubmit. 


CBM302I 


INITIALIZED. 
Reason : 


System  Action: 
User  Action: 


The  user  requested  to  initialize  the 
Anthropometric  data  base  using  the 
INITIALIZE  ANTHROPOMETRIC  DATA  BASE 
Function  (+INT) . 

The  Data  Base  is  initialized. 

None . 


CBM303A 


NO  NAME  GIVEN; 
Reason : 

System  Action: 
User  Action: 


operation  IGNORED. 

The  operation  specified  on  the  con¬ 
trol  card  requires  a  membername;  but 
no  name  was  supplied. 

The  control  card  and  subsequent 
data,  if  any,  are  ignored. 

Correct  the  card,  adding  the  appro¬ 
priate  additional  information  as 
required  in  the  definition  of  the 
specific  operation,  and  resubmit. 
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CBM304A 


CBM305A 


CBM306A 


CBM307A 


CBM308A 


TYPE  SPECIFICATION  INVALID  FOR  MEMBER  membername. 


Reason : 

System  Action: 
User  Action: 


An  invalid  type  code,  that  is,  a 
type  code  other  than  0  or  1,  was 
given  for  the  specified  member. 
Control  card,  and  any  subsequent 
data,  are  ignored. 

Correct  code  and  resubmit. 


NUMBER  OF  ANTHROPOMETRIC 
MEMBER  membername . 

Reason : 


DIMENSIONS  INVALID  FOR 


System  Action: 


User  Action: 


The  number  of  anthropometric  dimen¬ 
sions  specified  for  the  given  member 
on  either  the  +ADD  or  +CHK  control 
card  was  either  less  than  one  or 
greater  than  45. 

Control  card  and  any  subsequent  data 
are  ignored. 

Correct  value  and  resubmit. 


NUMBER  OF  COMBINATIONS  OF 
INVALID  FOR  MEMBER  membername 
Reason:  The 


INDEPENDENT  VARIABLES 


System  Action: 


User  Action: 


number  of  combinations  of  inde¬ 
pendent  variables  (the  product  of 
the  number  of  mass  related  variables 


and  the  number 
variables)  for 
control  card  is 
greater  than  50, 
member . 

The  control  card 
data  are  ignored. 
Correct  the  card 


of  length  related 
the  +ADD  or  +CHK 
less  than  one  or 
for  the  specified 

and  any  subsequent 

and  resubmit. 


NUMBER  OF  DEPENDENT  VARIABLES  INVALID  FOR  MEMBER 
membername 

The  number  of  dependent  variables 
specified  on  the  +ADD  or  +CHK  con- 


Reason : 


System  Action: 
User  Action: 


trol  card  was  less 
greater  than  30  for 
member . 

The  control  card 
data  are  ignored. 

Correct  the  card  and  resubmit. 


than  one  or 
the  indicated 


and  any  subsequent 


NUMBER  OF  PERCENTILES  INVALID  FOR  MEMBER  membername 
Reason:  The 

on 


System  Action: 


User  Action: 


number  of  percentiles  specified 
the  +ADD  or  +CHK  control  card  was 
less  than  one  or  greater  than  30  for 
the  indicated  member. 

The  control  card  and  subsequent  data 
are  ignored. 

Correct  the  number  and  resubmit. 
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CBM309A 


CBM310A 


CBM311A 


CBM312A 


CBM313I 


ILLEGAL  CONTROL  CARD  FOR  MEMBER  member name  DUE  TO  nn 
ERRORS . 

Reason : 


System  Action: 
User  Action: 


Control  card  format  invalid.  The 
system  found  nn  errors. 

Control  card  and  subsequent  data 
cards  are  ignored. 

Correct  the  card  and  resubmit. 


INSUFFICIENT  SPACE  REMAINING  TO  ADD  MEMBER 

membername . 

Reason:  The  Data  Base  does  not  have  suffi¬ 

cient  continuous  space  to  add  the 
specified  member. 

System  Action:  The  member  is  not  added  to  the  data 

base . 

User  Action:  Run  the  program  CBMAM  with  the  +CMP 

control  card,  followed  by  the  re¬ 
quest  to  add  the  specified  member. 
If  the  CBM310A  message  reappears, 
members  will  have  to  be  deleted 
(using  the  +DEL  function)  before 
adding  new  member. 

DIRECTORY  IS  FULL,  CANNOT  ADD  membername . 


Reason : 


System  Action: 


User  Action: 


The  Data  Base  directory,  which  con¬ 
tains  the  location  of  each  member 
within  the  file,  can  hold  a  maximum 
of  20  entries. 

The  member  is  not  added  to  the  Data 
Base . 

Delete  a  member  and  add  the  new 
member . 


MEMBER  membername  IS  NOT  FOUND  IN  THE  DIRECTORY. 


Reason : 

System  Action: 
User  Action: 


The  type  0  member  membername  which 
was  referenced  by  the  type  1  member 
is  not  in  the  directory. 

The  control  card  and  data  are  ig¬ 
nored  . 

Check  that  the  type  0  member  was 
specified . 


MEMBER,  membername  IS  TYPE  tt  AND  CONTAINS  nn 

ANTHROPOMETRIC  VARIABLE  NAMES. 

Reason:  The  +ADD  or  +CHK  control  card  has 

been  reaa  in  for  the  specified  mem¬ 
ber,  ana  the  type  field  and  the 
number  of  variables  have  been  ac¬ 
cepted  . 

System  Action:  Program  continues  execution. 

User  Action:  None. 
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CBM314I 


CB  M3 15  A 


CBM316A 


CBM317A 


MEMBER  ALSO  CONTAINS  rm  ADDITIONAL  RECORDS,  EACH 
CONTAINING  THE  REGRESSION  COEFFICIENTS  FOR  mm  DEPEN¬ 
DENT  VARIABLES. 

Reason:  Message  is  printed  for  +ADU  or  +CHK 

control  card  for  type  0  members.  It 
provides  information  on  the  number 
of  additional  records  associated 
with  the  previously  specified  member. 
Program  continues  execution. 

None . 


System  Action : 
User  Action: 


VARIABLE  var  iablenamel  HAS  THE  SAME  NUMBER  AS  VARI¬ 
ABLE  var iablename2 . 

Each  variable  entered  as  part  of  a 
type  0  or  type  1  member  must  have  a 
unique  number. 

Record  which  defines  var iablenamel 
is  flagged  as  containing  an  error. 
Member  is  not  added. 

Correct  the  number  and  resubmit. 


Reason : 


System  Action: 


User  Action: 


var  lable  name  USED  IN  VARIABLES  nl  AND  n_2. 

Each  variable  number  must  have  a 
unique  variable  name. 

Record  which  contains  variable  num¬ 
ber  n2  is  flagged  as  containing  an 
error.  Member  is  not  added. 

Correct  record  and  resubmit. 


Reason : 

System  Act  ion : 


User  Action: 


var  iable  name 

Reason : 


IS  NEITHER  DEPENDENT 
An  anthropometric 
defined  as  either 
one  necessary  for 


System  Act  ion : 


User  Action: 


OR  INDEPENDENT, 
variable  must 
dependent ,  that 
the  creation 


be 

is 

of 

or 


the  link  system  of  the  model 
independent,  that  is  a  variable 
highly  correlated  to  body  segment 
mass  or  body  segment  length.  This 
variable  has  not  been  flagged  as 
e  ither . 

The  record  is 
an  error  ,  and 
added  to  the  da 
Punch  a  "1"  in 
or  34  ,  depend 
variable  and  re 


flagged  as  containing 

the  member 
ta  base. 

is 

not 

either  column 

16  , 

30  , 

ing  on  the 
submit . 

type 

of 
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CBM318A 


CBM319A 


CBM320A 


CBM321A 


CBM322A 


var iablename  IS  INDEPENDENT  VARIABLE  FOR  BOTH  MASS 


AND  LENGTH. 
Reason : 


System  Action : 


User  Action: 


An  anthropometric  variable  may  be  an 
independent  variable  correlated  to 
either  mass  or  length,  but  not  to 
both . 

The  record  is  flagged  as  containing 
an  error,  and  the  member  is  not 
added  to  the  Data  Base. 

Delete  the  entry  "1"  from  either 
column  26  or  30  and  resubmit. 


MEMBER  membername  CONTAINS  TOO  MANY  INDEPENDENT 
VARIABLES. 


Reason : 


System  Action: 
User  Action: 


The  number  of  combinations  of 
independent  variables  (number  of 
mass  variables  x  number  of  length 
variables)  encountered  must  be  equal 
to  the  number  of  combinations  speci¬ 
fied  on  the  +ADD  or  +CHK  control 
card . 

Member  is  not  added  to  Data  Base. 
Verify  the  totals,  make  the  appro¬ 
priate  corrections,  and  resubmit. 


MEMBER  membername  CONTAINS  TOO  MANY  DEPENDENT 

VARIABLES . 

Reason:  The  number  of  dependent  variables 

encountered  must  be  equal  to  the 
number  of  dependent  variables  speci¬ 
fied  on  the  +ADD  or  +CHK  control 
card . 

System  Action:  Member  is  not  added  to  the  Data  Base. 

User  Action:  Verify  the  total,  make  appropriate 

corrections,  and  resubmit. 


UNIT  OF  MEASUREMENT,  uu  FOR  VARIABLE  variablename  IS 

NOT  PERMISSIBLE. 

Reason:  Valid  units  of  measurement  are  IN, 

CM,  MM,  LB,  and  KG. 

System  Action:  The  record  is  flagged  and  the  member 

is  not  added  to  the  Data  Base. 

User  Action:  Supply  a  valid  unit  of  measurement, 

and  resubmit. 

DATA  CARD  IMAGE  multiple  regression  coefficient  card 

image  OUT  OF  SEQUENCE. 

Reason:  For  each  combination  of  independent 

variables,  a  total  of  NDEP+1  records 
must  be  supplied,  each  beginning 
with  the  same  two  variable  numbers 
specifying  the  mass  and  length  vari¬ 
able. 

System  Action:  The  record  is  flagged  and  the  member 

is  not  added  to  the  Data  Base. 

User  Action:  Correct  the  error  and  resubmit. 
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CBM32  3A 


NOT  AN  INDEPENDENT 


CBM324A 


CBM325A 


CBM326A 


VARIABLE  variable  name  IS 

VARIABLE  PERTAINING  TO  MASS. 

Reason:  The  variable  number  supplied  in 

column  1-3  of  the  regression  data 
cards  should  correspond  to  a  vari¬ 
able  name  defined  as  a  mass  related 
independent  variable  on  one  of  the 
anthropometric  variable  definition 
cards.  (See  Figure  89) 

System  Action:  The  record  is  flagged  and  the  member 

is  not  added  to  the  Data  Base. 

User  Action:  Correct  the  error  and  resubmit. 

VARIABLE  var lablenarne  IS  NOT  AN  INDEPENDENT  VARIABLE 

PERTAINING  TO  LENGTH. 

Reason:  The  variable  number  supplied  in 

column  4-6  of  the  regression  defini¬ 
tion  data  cards  should  correspond  to 
a  variable  name  defined  as  a  length 
related  independent  variable  on  one 
of  the  anthropometric  variable  de¬ 
finition  cards.  (See  Figure  89) 

System  Action:  The  record  is  flagged  and  the  member 

is  not  added  to  the  Data  Base. 

User  Action:  Correct  the  error  and  resubmit. 


VARIABLE  var iablename  IS  NOT  A  DEPENDENT  VARIABLE. 
Reason:  The  variable  number  supplied  in 

columns  7-9  of  the  multiple  regres¬ 
sion  data  definition  cards  should 
correspond  to  a  variable  name  de¬ 
fined  as  a  dependent  variable  on  one 
of  the  anthropometric  variable  de¬ 
finition  cards.  (See  Figure  89) 
System  Action:  The  record  is  flagged  and  the  member 

is  not  added  to  the  Data  Base. 

User  Action:  Correct  the  error  and  resubmit. 


VARIABLE  nn  OUT 
Reason : 

System  Action: 
User  Action: 


OF  SEQUENCE. 

For  a  type  1  member  definition,  the 
survey  definition  cards  must  contain 
the  variable  numbers  in  ascending 
order . 

The  record  is  flagged  and  the  member 
is  not  added  to  the  Data  Base. 

Make  necessary  corrections  and  re¬ 
submit. 
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CBM327A 


CBM328A 


CBM329I 


CBM3  30I 


CBM331A 


CBM332A 


var iablename  IN  MEMBER  survey  membername  DOES  NOT 
CORRESPOND  TO  VARIABLE  nn  IN  regression  member  name . 
Reason:  The  variable  names  and  numbers  in 

the  type  1  member  survey  member  name 
should  correspond  exactly  to  the 
names  and  numbers  in  the  referenced 
type  0  member  regression  membername. 
System  Action:  The  record  in  the  type  1  member 

definition  is  flagged  and  the  member 
is  not  added  to  the  data  base. 

User  Action:  Verify  the  survey  definition  vari¬ 

able  number  and  name  against  the 
regression  or  type  0  member,  make 
necessary  corrections,  and  resubmit. 


ANTHROPOMETRIC 
Reason : 


System  Action: 
User  Action: 


DIMENSION  LT  OR  EQ  TO  ZERO. 

Dimensions  supplied  in  the  survey 
member  definition  cards  must  be 
positive  real  numbers. 

The  record  is  flagged  and  the  member 
is  not  added. 

Correct  and  resubmit. 


MEMBER  regression  membername,  WITH  nri  ANTHROPOMETRIC 
VARIABLES  AND  X  nn2  SETS  OF  REGRESSION 

EQUATIONS,  HAS  BEEN  ADDED. 

Reason:  The  type  0  member  is  added  to  the 

Data  Base. 

System  Action:  The  member  is  added  to  the  Data  Base. 
User  Action:  None. 


MEMBER  survey  membername,  WITH  nn  ANTHROPOMETRIC 
VARIABLES  AND  nr^  PERCENTILES,  AND  REFERENCING 
SURVEY  regression  membername  HAS  BEEN  ADDED. 

Reason:  The  type  1  member  is  added  to  the 

Data  Base. 

System  Action:  The  member  is  added  to  the  Data  Base. 
User  Action:  None. 


membername  HAS  NOT  BEEN  ADDED  DUE  TO  nnn  ERRORS . 
Reason:  After  checking  the  member  defini¬ 

tion,  nnn  syntax  errors  were  found. 
System  Action:  The  member  is  not  added  to  the  Data 

Base . 

User  Action:  Correct  the  errors,  and  resubmit. 


MEMBER  membername  CHECKED  -  nnnnn  ERRORS. 

Reason:  After  checking  the  member  defini¬ 

tion,  nnnnn  syntax  errors  were  found. 
System  Action:  None. 

User  Action:  Correct  the  errors  and  resubmit. 
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CBM333I 


MEMBER  membername  DELETED 


CBM334I 


CBM335I 


CBM336I 


CBM337I 


CBM339A 


CBM340A 


Reason : 


System  Action: 
User  Action: 


User  requested  +DEL  function  caused 
a  member  to  be  deleted  from  the  Data 
Base. 

Member  deleted  from  Data  Base. 

None. 


membername  NOW 
Reason: 


System  Action: 
User  Action: 


IN  PLACE. 

User  requested  +CMP  function  caused 
member  to  be  moved  within  Data  Base, 
combining  unused  space. 

Directory  index  in  data  base  updated. 
None . 


membername  WAS 
Reason : 


System  Action: 
User  Action: 


IN  PLACE. 

User  requested  +CMP  function  and  the 
system  found  that  the  member  membe r- 
name  need  not  be  moved. 

Compression  of  Data  Base  continues. 
None . 


COMPRESS  FINISHED. 

Reason:  Successful  completion  of  +CMP  func¬ 

tion. 

System  Action:  Program  execution  continues. 

User  Action:  None. 


membername  PUNCHED. 

Reason:  User  initiated  +PCH  function  for 

member  membername  successfully  com¬ 

pleted  . 

System  Action:  Punching  is  completed. 

User  Action:  None. 


END-OF-DATA. 

Reason:  End  of  file  found  before  END  Program 

Control  Card  (+END)  was  found. 

System  Action:  Terminates  job. 

User  Action:  Check  that  all  control  cards  were 

processed . 

MEMBER  membername  ALREADY  EXISTS. 

Reason:  The  user  has  tried  to  ada  an  anthro¬ 

pometric  member  definition  under  a 
name  that  already  exists  in  the  Data 
Base . 

System  Action:  The  control  card  is  ignored. 

User  Action:  Use  a  new  name  and  resubmit. 
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CBM341A 


CBM342A 


CBM343A 


CBM399I 


DATA  BASE  IS  NOT  AN  ANTHROPOMETRIC  DATA  BASE. 

Reason:  First  record  of  file  does  not  con¬ 

tain  "ANTH",  the  Anthropometric  Data 
Base  ident if icaton  word. 

System  Action:  Terminates  the  program. 

User  Action:  Contact  systems  programmer. 

I/O  ERROR  ON  RECORD  nnnnn  (INDEX). 

Reason:  An  I/O  error  has  occurred  in  the 

directory  of  the  Anthropometric  Data 
Base . 

System  Action:  Terminates  the  program. 

User  Action:  Contact  systems  programmer. 

I/O  ERROR  ON  RECORD  nnnnn  (DATA). 

Reason:  An  I/O  error  has  occurred  in  a  mem¬ 

ber  definition  on  the  Anthropometric 
Data  Base. 

System  Action:  Terminates  the  program 

User  Action:  Contact  systems  programmer. 


PROGRAM  END. 

Reason:  The  +END  Control  Card  was 

encountered,  or  the  end  of  input 
cards  was  encountered,  or  there  was 
an  I/O  error. 

System  Action:  Terminates  the  program. 

User  Action:  Check  that  all  control  cards  were 

accepted,  and  processed  correctly. 
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SECTION  5 

COMBIMAN  CREW  STATION  DATA  BASE  MAINTENANCE  PROGRAM  (CBMCM) 


The  COMBIMAN  system  is  an  effective  tool  to  analyze  and 
evaluate  crew  stations.  These  crew  stations  may  already  be  in 
use,  or  may  exist  only  as  an  engineer's  drawing.  The  best  way 
to  make  these  crew  stations  available  to  the  man-model  in  the 
interactive  graphics  program  CBM05  is  to  store  the  three  dimen¬ 
sional  coordinates  of  the  panels  and  controls  of  the  crew  sta¬ 
tion  on  a  Data  Base  accessed  by  CBM05.  The  program  CBMCM  is 
developed  to  assist  the  user  to  create  and  to  maintain  such  a 
Crew  Station  Data  Base.  The  data  flow  for  the  program  CBMCM  is 
shown  in  Figure  100. 

The  Crew  Station  Data  Base  contains  definitions  which 
describe  the  crew  stations  geometrically.  Typical  crew  sta¬ 
tions  are  aircraft  cockpits,  driver's  area  of  an  automobile, 
etc.  To  define  a  crew  station,  the  user  must  supply  the  defi¬ 
nition  and  3-D  coordinates  of  the  vertices  of  the  "panels" 
which  make  up  the  crew  stations  and  controls  found  on  and  about 
the  defined  panels.  Each  crew  station  in  the  Data  Base  is 
called  a  "member",  and  is  referenced  by  its  membername. 


5.1  AVAILABLE  PROCESSING 

The  program  CBMCM  allows  the  user  to  create  and  maintain 
the  Crew  Station  Data  Base.  Input  supplied  by  the  user,  on  80 
character  computer  cards  or  in  card  image  format  (80  character 
records)  on  a  magnetic  tape  or  any  other  device,  is  read  into 
the  program  CBMCM  and  is  processed  according  to  the  control 
card  commands  selected  by  the  user.  These  commands  allow  the 
user  to  add  or  delete  members,  to  print  or  punch  existing  mem¬ 
bers,  or  to  list  the  contents  of  the  Data  Base  and  its  direc¬ 
tory.  The  program  is  also  used  to  compress  the  members  within 
the  Data  Base. 
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Figure  100.  Data  Flow  for  Program  CBMCM. 
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The  control  cards  for  CBMCM  may  be  input  in  any  order  with 
one  exception.  If  the  Data  Base  is  created  for  the  first  time, 
or  it  it  is  reinitialized,  the  $INT  (Initialize)  control  card 
must  precede  all  other  control  cards  and  member  definitions. 


5.2  RESTRICTIONS  AND  LIMITATIONS 

The  Crew  Station  Data  Base  may  contain  up  to  20  members. 
The  sum  of  the  record  counts  for  all  the  members  may  not  exceed 
1979  records.  Information  on  the  number  of  members  on  the  Data 
Base  and  their  size  may  be  “obtained  by  using  the  $PRT  control 
card,  omitting  reference  to  any  member  name.  Membernames  are 
limited  to  8  alphanumeric  characters.  A  member  definition  may 
contain  a  maximum  of  300  panels  and  300  controls.  Additional 
limitations  are  described  in  Paragraph  5.3.2,  "Processing 
Specifications. " 


5.3  HOW  TO  USE  PROGRAM  CBMCM 

The  example  used  to  illustrate  this  program  is  based  on 
the  crew  station  in  Figure  101,  a  seven-drawer  desk.  In  mod¬ 
eling  the  desk,  only  the  top,  front  side,  and  leg  are  defined. 
The  other  sides  are  not  needed  because  they  do  not  cause  any 
physical  or  visual  interference  to  the  man-model  seated  at  a 
desk . 


5.3.1  Input  Data  Specification 

Using  the  dimensions  of  the  desk,  and  the  origin 
as  indicated  in  the  figure,  three  dimensional  coordinates  are 
obtained  for  the  various  vertices  of  the  panels  and  for  the 
locations  of  the  controls.  The  program  CBMCM  is  set  up  to 
accept  crew  station  definitions  in  any  three  dimensional  car¬ 
tesian  coordinate  system.  The  coordinate  system  for  COMBIMAN 
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Figure  101.  Sample  Crew  Station  -  DESK. 
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is  a  right  handed  system  (positive  x  forward,  positive  y  to  the 
left,  and  positive  z  up)  .  The  user  must  supply  the  program 
CBMCM  with  the  three-dimensional  coordinates  of  the  Seat  Refer¬ 
ence  Point  (SRP)  with  respect  to  the  origin  of  the  crew  sta¬ 
tion's  coordinate  system.  From  these  data,  the  program  con¬ 
verts  all  input  coordinates  of  the  panels  and  controls  to  the 
coordinate  system  of  the  COMBIMAN. 


Figure  102  shows  an  example  of  a  typical  Aircraft 
Coordinate  system  and  its  related  COMBIMAN  Coordinate  system. 

Panels  for  the  crew  station  must  have  three  to  six 
vertices.  Coordinate  data  for  these  vertices  are  entered  into 
tne  program  consecutively,  going  either  clockwise  or  counter¬ 
clockwise  along  the  perimeter  of  the  panel.  Some  examples  of 
valid  and  invalid  panels  are  shown  in  Figure  103.  A  total  of 
seven  panels  make  up  the  DESK  in  the  example.  Each  panel  has 
tour  vertices,  ano  is  rectangular  in  shape.  The  coordinates  of 
the  vertices  are  shown  in  Figures  104  and  105.  If  a  panel  has 
more  than  6  vertices,  or  has  a  curved  edge  so  that  more  than  6 
vertices  are  required  to  approximate  the  curve,  the  panel  must 
be  subdivided  into  multiple  panels  of  three  to  six  vertices. 


Controls  are  defined  by  either  absolute  or  rela¬ 
tive  coordinates.  If  the  control  is  not  placed  on  a  panel,  it 
must  be  defined  in  absolute  coordinates,  that  is,  those  of  the 
crew  station  coordinate  system.  Before  storing  on  the  Data 
Base,  the  coordinates  are  translated  and  rotated  to  the  COMBI¬ 
MAN  system  of  coordinates  by  CBMCM. 


If  the  control  is  located  on  a  defined 
coordinates  can  be  given  relative  to  any  vertex  of 
In  this  instance,  the  x-  and  y-displacements  are  give 
to  the  vertex  number  specified.  The  z-value  must  be 


panel,  its 
the  panel, 
n  relative 
zer  o . 
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Figure  102.  An  Example  of  a  Typical .Aircraft  Coordinate  System  and 
Its  Related  COMBIMAN  Coordinate  System. 


Valid  Panel 
Shapes 


Invalid  Panels 


2 


Line  between  vertices  2  and  4 
would  not  lie  within  the  panel. 


Line  between  vertices  3  and  5 
would  not  lie  within  the  panel. 


Line  between  vertices  2  and  4 
would  not  lie  within  the  panel. 


Panel  is  convex,  but  has  8 
vertices,  2  more  than  allowed. 


Figure  103.  Example  of  Valid  and  Invalid  Panels. 
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Figure  104.  X,  Y  and  Z  Coordinates  of  Panels  of  DESK. 
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Figure  105.  X,  Y  and  Z  Coordinates  of  Panels  of  DESK. 
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The  x-displacement  is  the  offset  from  the  vertex  number  n  in 
the  direction  of  the  line  connecting  the  nth  and  (n-1)  th  ver¬ 
tices.  The  y-displacement  is  in  direction  of  the  line  connect¬ 
ing  nth  and  (n+1) th  vertices.  The  convention  for  determining 
the  location  of  a  control  in  a  panel  relative  to  its  vertices 
is  shown  in  Figure  106. 


5.3.2  Processing  Specifications 


Program  CBMCM  allows  the  user  to  maintain  the  Data 
Base  by  adding,  deleting,  listing,  etc.  the  crew  station  defi¬ 
nitions.  The  formats  to  request  the  functions  are  shown  in 
Figure  107.  These  requests  (one  request  per  card)  plus  the 
crew  station  definitions  are  used  as  input  to  the  program.  The 

control  cards  may  be  input  in  any  order  with  one  exception: 

when  the  Data  Base  is  initialized  or  reinitialized,  the  $INT 

control  card  must  be  the  first  input  data  card.  The  control 
card  formats  are  described  in  the  following  paragraphs. 

5. 3. 2.1  ADD  CREW  STATION  MEMBER  Function 
$ADD  membername  npnls  net Is  srpx 

srpy  srpz  x  ^  z  (followed  by  a  crew 

station  definition) . 


The  ADD  CREW  STATION  MEMBER  function 
adds  the  specified  data  under  the  name  membername  to  the  Crew 
Station  Data  Base.  The  membername  is  limited  to  a  length  of 
eight  characters.  The  crew  station  definition  contains  npnls 
panels,  and  nctls  controls.  These  numbers  should  be  entered  as 
integers,  right  justified  in  their  three  digit  fields.  The 
Seat  Reference  Point  (SRP)  coordinates  are  srpx ,  srpy ,  and  srpz 
and  are  entered  in  F6.2  Format.  If  a  decimal  point  is  omitted, 
the  program  CBMCM  will  assume  a  decimal  point  between  the  sec¬ 
ond  and  third  digits  from  the  right.  The  directions  of  the 
positive  x,  y,  and  z^  coordinate  axes  are  indicated  by  the  char¬ 
acters  in  the  x,  y,  and  z  fields  respectively.  The  possible 
values  for  x,  y,  and  z  are  F  for  Forward,  A  for  Aft,  L  for 
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107.  Program  CBMCM  Control  Card  Format. 


Left,  R  for  Right,  U  for  Up,  and  d  for  Down.  These  directions 
are  given  with  respect  to  the  seated  crewmember.  If  the  crew 
station  represents  a  seat,  the  last  four  letters  of  its  member- 
name  should  be  "SEAT". 


For  each  crew  station  panel  there  are 
two  format  data  cards,  shown  in  Figures  108  and  109.  In  Figure 
108,  columns  1-3  contain  an  integer  sequence  number  of  the 
panel,  right  justified  in  the  field.  The  first  panel  entered 
should  have  the  sequence  number  "1".  Panel  numbers  need  not  be 
consecutive,  but  they  must  be  unique.  Columns  4-11  contain  the 
eight-character  name  of  the  panel.  Columns  15-17  contain  the 
panel  type,  as  an  integer,  right  justified.  The  panel  types 
are  "0"  or  "1"  for  general  crew  station  panel,  "2"  for  seat 
panel,  and  "3"  for  a  rudder/brake  pedal  panel.  If  no  type  code 
is  specified,  "1"  is  assumed.  Column  18  contains  the  number  of 
vertices  of  the  panel;  the  panel  must  have  3  to  6  vertices. 
The  x,  y  and  z  coordinates  of  each  vertex  are  entered  consecu¬ 
tively,  going  either  clockwise  or  counterclockwise  around  the 
perimeter  of  the  panel. 


Each  control  is  defined  on  a  card  using 
the  format  in  Figure  110.  The  control  name  is  listed  in  col¬ 
umns  1-8.  If  the  control  is  defined  relative  to  a  vertex,  pnl# 
references  a  previously  defined  panel  and  is  entered  as  an 
integer  value,  right  justified  in  the  field.  The  vertex  to 
which  the  control  is  defined  relative  to  is  specified  in  the 
one-digit  field  vjf.  If  a  non-zero  value  is  entered  for  pnl  # ,  a 
non-zero  value  must  be  entered  for  the  field  v_|.  If  the  loca¬ 
tion  is  relative  to  a  defined  panel,  the  z-field  is  left 
blank.  If  the  location  of  the  control  is  absolute,  x,  y,  and  z 
values  must  be  supplied.  The  coordinates  of  the  control  are 
assumed  to  be  real  numbers.  If  no  decimal  point  is  supplied, 
the  program  assumes  a  decimal  point  between  the  second  and 
third  digits  from  the  right. 
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Figure  110.  Program  CBMCM  ADD  Member  Card  Format  for  Controls. 


An  example  of  the  input  definition  for 
the  member  "DESK"  is  shown  in  Figure  111.  The  first  outlined 
area  is  the  $ADD  control  card.  The  second  outlined  area  shows 
the  panel  definition  cards  followed  by  the  control  definition 
cards  in  outlined  area  (3)  . 

If  the  program  detects  an  error  in  the 
input  data  for  a  member,  the  member  will  not  be  added  to  the 
Data  Base. 


5. 3. 2. 2  CHECK  CREW  STATION  MEMBER  Function 

$CHK  member name  npnls  net Is  srpx  srpy 
srpz  x  z  (followed  by  a  crew  station 
definition) . 

The  CHECK  CREW  STATION  MEMBER  function 
operates  in  the  same  way  the  ADD  CREW  STATION  MEMBER  function 
does,  EXCEPT  that  the  member  is  not  added.  This  function 
checks  new  member  input  data  for  proper  format  and  content. 

5. 3. 2. 3  DELETE  CREW  STATION  MEMBER  Function 

$DEL  member name 

The  DELETE  CREW  STATION  MEMBER  function 
removes  the  specified  crew  station  member  from  the  Data  Base, 
but  does  NOT  make  the  space  occupied  by  the  member  available 
for  reuse.  In  order  to  make  the  space  available  to  add  more 
crew  stations,  the  COMPRESS  CREW  STATION  DATA  BASE  function 
must  be  used. 
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Figure  111.  Sample  Data  for  $ADD  Member  Function. 
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5. 3. 2. 4  COMPRESS  CREW  STATION  DATA  BASE  Function 

$CMP 

The  COMPRESS  CREW  STATION  DATA  BASE 
function  compresses  used  space  together  maximizing  the  amount 
of  continuous  unused  space.  The  intermediate  blocks  of  unused 
space  are  created  by  the  DELETE  CREW  STATION  MEMBER  function. 
When  the  message  "CBM127A  NO  SPACE,  CANNOT  ADD  membername" 
appears  while  adding  a  crew  station  it  is  necessary  to  use  this 
function.  If  the  $ADD  function  gives  the  CBM127A  message 
immediately  after  the  $CMP  function,  the  Data  Base  is  full. 

5. 3. 2. 5  DUMP  CREW  STATION  MEMBER  Function 

$DMP  membername 

$DMP 

The  DUMP  CREW  STATION  MEMBER  function 
prints  the  contents  of  the  crew  station  member  membername ,  or 
prints  the  complete  Crew  Station  Data  Base  if  member  name  is 
omitted  on  the  control  card.  The  format  of  the  display  is: 

RECORD  nn  +=+  (record  in  EBCDIC)  +=+ 

+=+  (record  in  hexadecimal)  +=+ 

+=+  (rest  of  record  in  hexadecimal)  +=+ 

The  +=+  characters  act  as  delimeters  of 
the  displayed  data.  This  function  is  used  primarily  by  system 
programmers  to  test  the  file. 

5. 3. 2. 6  END  PROGRAM  Function 

$END 

The  END  PROGRAM  function  terminates 
execution  of  the  program  CBMCM. 
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5. 3. 2.7 


INITIALIZE  CREW  STATION  DATA  BASE 
Function 


$INT 

The  INITIALIZE  CREW  STATION  DATA  BASE 
function  resets  the  Data  Base  to  the  original  unused  state. 
The  primary  purpose  of  this  function  is  to  establish  a  Crew 
Station  Data  Base. 

b.3.2.8  PUNCH  CREW  STATION  MEMBER  Function 

$PCH  member name 

The  PUNCH  CREW  STATION  MEMBER  function 
punches  a  copy  of  the  specified  member  in  a  format  that  the  ADD 
CREW  STATION  MEMBER  function  requires.  Specifying  a  member  name 
that  does  not  exist  on  the  directory  will  result  in  a  printout 
ot  all  tne  membernames  on  the  Data  Base. 

5. 3. 2. 9  PRINT  CREW  STATION  MEMBER  Function 

$PRT  member name 

$PRT 

The  PRINT  CREW  STATION  MEMBER  function 
prints  the  contents  of  the  specified  member,  member name ,  in  a 
format  similar  to  that  of  the  ADD  CREW  STATION  MEMBER  func¬ 
tion.  Specifying  no  name,  or  a  nonexisting  name  causes  a 
printout  of  the  index  containing  membernames,  their  record 
locations  on  the  Data  Base,  and  the  origin  and  orientation  of 
their  coordinate  systems. 

5.3.3  Submitting  a  Processing  Request 

The  sequence  of  JOB  CONTROL  LANGUAGE  (JCL)  cards 
needed  to  execute  the  program  CBMCM  are  shown  in  Figure  112. 
All  function  control  cards  and  member  definition  cards  follow 
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Figure  113.  FT01  DD  Card  to  Allocate  Space  on  Disk  and 
Execute  Program  CBMCM. 


the  "//SYSIN  DD*M  card.  The  "//FT01F001"  DD  card  included  in 
this  sequence  assumes  that  the  space  for  the  Data  Base  has 
already  been  allocated  on  disk.  If  the  Data  Base  does  not 
exist,  the  "//FT01F001"  DD  card  specified  in  Figure  112  should 
be  replaced  by  the  sequence  of  cards  shown  in  Figure  113.  This 
sequence  to  allocate  space  tor  the  Data  Base  and  to  initialize 
it  should  be  executed  only  once.  Thereafter,  the  simplified 
"//FT01F001"  DD  card  shown  in  Figure  112  should  be  used  for  all 
file  manipulations. 


Once  the  Data  Base  is  allocated  on  Disk,  it  must 
be  initialized  using  $INT  function  before  using  any  other 
function.  For  every  CBMCM  job,  the  last  function  control  card 
read  into  the  program  should  be  the  "$END"  card. 

5.3.4  Output  Data  Interpretation 

The  program  CBMCM  generates  output  to  the  card 
punch,  disk  file,  or  printer,  depending  on  the  specified  con¬ 
trol  card  function.  The  formats  for  the  printed  output  will  be 
discussed  in  this  section.  Punched  records  have  the  same  for¬ 
mat  as  tne  input  data  records  discussed  in  Paragraph  5.3.2. 
The  physical  format  of  the  records  on  the  Data  Base  is  not 
described  here. 

Five  basic  formats  are  used  by  CBMCM  for  printed 
output.  These  format  types,  their  use,  and  their  examples  are 
presented  in  this  subsection.  All  types  begin  with  the  same 
heading  "CBMCM",  the  date  and  time  of  the  program  execution, 
and  page  number. 

The  first  type  of  output  is  generated  by  the  INI¬ 
TIALIZE,  PUNCH,  COMPRESS,  DELETE,  and  END  functions.  The  out¬ 
put  indicates  the  start  and  end  of  processing  associated  with 
the  specified  function.  For  the  COMPRESS  function  additional 
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messages  indicating  that  a  particular  member  is,  or  is  not 
moved  in  the  process  of  combining  unused  space  is  also  print¬ 
ed.  An  example  of  this  format,  for  the  COMPRESS  function,  is 
shown  in  Figure  114. 


The  second  type  of  output  is  generated  by  the 
PRINT  or  PUNCH  functions  when  the  $PRT  or  $PCH  control  card  is 
supplied  with  blank  membername  field.  This  causes  the  index  of 
the  Data  Base  printed  in  the  following  format: 

nn.)  membername,  EXTENT=  (n_l  ,n2^  ,  n£  PANELS,  nc  CONTROLS, 
ORIGIN= (XX,  ’  ORIENT= (a,  b,  c) 

where : 


nn 

is  the  number  of  the  member  identifi¬ 
cation  record  within  the  directory 

membername 

is  the  name  of  the  member  identified 

nl 

is  the  location  of  the  first  record 
which  defines  this  member 

n_2 

is  the  location  of  the  last  record  which 
defines  this  member 

he 

is  the  number  of  panels  associated  with 
this  member 

nc 

is  the  number  of  controls  associated 
with  this  member 

XX 

yy 

zz 

is  the  location  of  the  seat  reference 
point  with  respect  to  the  origin  of  the 
coordinate  system  of  the  crew  station 

a 

is  the  orientation  of  the  positive  x- 
axis  of  the  crew  station 

b 

is  the  orientation  of  the  positive  y- 
axis  of  the  crew  station 

c 

is  the  orientation  of  the  positive  z- 
axis  of  the  crew  station 

An 

example  of  the  PRINT  function  is  shown  in 

Figure  115. 
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Figure  115.  A  Sample  Output  of  the  $PRT  (No  Membername)  Function. 


The  third  type  of  output  is  generated  by  the  DUMP 
function.  This  function  is  intended  to  be  used  primarily  by 
system  programmers  to  locate  the  cause  of  I/O  (Input/Output) 
errors  on  the  Data  Base.  For  the  member  specified  on  the  $DMP 
control  card,  a  message  giving  directory  or  index  information 
is  printed  using  the  second  output  format  described  elsewhere. 
Each  data  record  associated  with  the  member  is  printed  in  the 
following  format: 

RECORD  nn  +=+  (record  in  EBCDIC)  +=+ 

+=+  (record  in  hexadecimal)  +=+ 

+=+  (remainder  of  record  in  hexadecimal)  +=+ 


whe 
The 
or  d 
of 


re  nn  is  the  location  of  the  record  within  the  Data  Base, 
record  in  EBCDIC  is  printed  using  a  25A4  format.  The  rec- 
in  hexadecimal  is  printed  using  a  10Z8  format.  An  example 
the  output  for  the  DUMP  function  is  shown  in  Figure  116. 
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fourth  output  format  is  used  by  the  CHECK  and 
After  reading  the  control  card  and  checking  it 
information  contained  on  the  card  is  reformat- 
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^  injure  116.  A  Sample  Output  of  the  $DMP  Function 


where : 


nn 

is  the  panel  number 

pnl  nm 

is  the  panel  name 

tt 

is  the  panel  type 

nv 

is  the  number  of  vertices  used  to  define 
the  panel 

xxi/YYi/ZZi  are  the  x,  y,  and  z  coordinates  for  the 

ith  vertex  of  the  panel,  in  the  crew 
station  system  of  coordinates,  where 
i=l,  nv. 

axi,ayi,axi  are  the  x,  y,  and  z  coordinates  of  the 

ith  vertex  of  the  panel,  converted  to 
the  COMBIMAN  system  of  coordinates, 
where  i=l,  nv. 

After  all  the  panel  definition  data  are  printed, 


CBMCM  prints 

the  control  data  using  the  following  format: 

cntl  nm 

tt  pnl  ret.  v.#  (xx,yy,zz)  TO  (ax,ay,az)  &  (rx,ry) 

where : 


cntl  nm 

is  the  8  character  name  of  the  control 

tt 

is  the  2  digit  control  type 

pnl  ref 

is  the  panel  where  the  control  is  loca¬ 
ted  (if  applicable) 

v.  # 

is  the  reference  vertex  number  for  that 
control  (if  applicable) 

XX 

yy 

zz 

are  the  three  dimensional  coordinates 
(relative  or  absolute)  which  define 
the  location  of  the  control 

ax 

ay 

az 

are  the  absolute  three  dimensional 
coordinates  which  define  the  location 
of  the  control  in  the  COMBIMAN  system  of 
coordinates 

rx 

ry 

are  the  two  dimensional  relative 
coordinates  of  the  control.  If  the 

control  is  not  defined  relative  to  a 
panel,  rx=ry=0.0. 
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An  example  of  this  fourth  output  format  for  the 
$ADD  function  is  shown  in  Figure  117. 

The  fifth  and  last  format  is  similar  to  that  used 
for  the  ADD  function  input,  and  is  used  for  the  PRINT  function 
when  a  valid  membername  is  specified.  The  main  difference 
between  tnis  format  and  the  fourth  is  that  this  format  does  not 
print  the  original  input  data  used  to  add  the  member  to  the 
Data  Base.  After  printing  the  index  record  for  the  member,  the 
program  CBMCM  prints  the  panel  definition  data  in  the  following 
format : 

nn.)  pnl  nm,  TYPE=tt,  nv  VERTICES- -ABSOLUTE  COORDINATES- - 

(xxi,  yy ,  zzi) 

(xxnvi  YYnv»  zznv) 

is  the  panel  number 

is  the  8-character  name  of  the  panel 
is  the  panel  type 

is  the  number  of  vertices  which  define 
the  panel 

are  the  x,  y,  and  z  coordinates  of  the 
ith  vertex  of  the  panel,  in  the  COMBI- 
MAN  system  of  coordinates,  where  i=l,  nv. 

After  printing  the  panel  deriniton  data,  the  pro¬ 
gram  prints  the  control  data  using  the  following  format: 

cntl  nm  tt  pnl  ref  v#  (ax,  ay ,  az )  (r x ,  ry) 
where : 

cntl  nm  is  the  8  character  name  of  the  control 

tt  is  the  2  digit  control  type 


where : 

nn 

pnl  nm 

tt 

nv 


xxi» YYi , zzi 
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Figure  117.  Example  of  Program  CBMCM  $ADD  (Membername)  Function  Output  Format 


pnl  ret 

is  the  panel  on  which  the  control  is 
located  (if  applicable) 

v#_ 

is  the  reference  vertex  number  of  the 
panel  for  that  control  (if  applicable) 

ax 

are  the  three  dimensional  coordinates 

ay  which  define  the  control  in  the 


az 

COMBIMAN  system  of  coordinates 

rx 

ry 

are  the  two  dimensional  relative 
coordinates  of  the  control.  It  the 

control  was  not  defined  relative  to  a 
panel,  rx=r y=0 . 0 . 

An  example  of  the  output  for  the  $PRT  function 
using  tne  fifth  format  is  shown  in  Figure  118. 

5.4  PROGRAM  MESSAGES  -  INCLUDING  ERROR  CORRECTION 

The  program  CBMCM  prints  both  information  and  action  rela¬ 
ted  messages.  The  message  format  is  as  follows: 


CBMlnni 

message  text 

where 


nn 

is  the  message  number 

i 

indicates  the  action  code  (^informa¬ 
tional,  A=action  to  be  performed),  and 

message  text 

is  the  text  of  the  message. 

Unless  otherwise  notea,  all  messages  are  generated  by  the  rou¬ 
tine  CBMCM. 

The  messages  are  as  follows: 

CBM100I  control  card  image 

Reason:  User  submitted  a  control  card. 

System  Action:  Continues  processing. 

User  Action:  None. 
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Figure  118.  A  Sample  Output  the  $PRT  Function. 


CBM101A 


CBM102A 


CBM103A 


CBM104A 


CBM105A 


CBM106A 


operation  UNKNOWN  OPERATION. 

Reason:  The  operation  on  the  control  card 

shown  in  the  previous  CBM100I  mes¬ 
sage,  is  unknown. 

System  Action:  Ignores  this  control  card. 

User  Action:  Correct  the  card  and  resubmit. 

panelnumber  INVALID  PANEL  NUMBER  FOR  POINT 

contr  olname . 

Reason:  The  panel  number  specified  by  the 

control  definition  card  does  not 
ex  ist . 

System  Action:  Assumes  that  the  control  is  defined 

in  absolute  coordinates. 

User  Action:  Delete  the  crew  station  member, 

correct  the  card  ,  and  resubmit. 

ver  texnumber  INVALID  VERTEX  NUMBER  FOR  POINT 

controlname. 

Reason:  The  panel  in  which  the  control  is 

defined  does  not  have  vertex  ver  tex¬ 
number  . 

System  Action:  Uses  vertex  number  1. 

User  Action:  Delete  the  crew  station  member, 

correct  the  error,  and  resubmit. 


Z  NOT  ZERO,  PANEL  &  VERTEX  NOW  ZERO  FOR  POINT 


controlname . 
Reason : 

Syste  m  Act  ion : 
User  Action: 


A  panel  number  and  a  vertex  number 
are  specified,  but  the  Z  value  is 
not  zero. 

Makes  Z  zero  and  continues  process¬ 
ing  . 


If  setting  Z  equal  to  zero  corrects 
the  problem,  no  action  needed. 
Otherwise,  delete  the  crew  station 
member  ,  correct  the  data  card  and 
resubmit . 


NO  NAME  GIVEN  , 
Reason : 


System  Action: 
User  Action: 


oper at  ion  IGNORED 

This  operation  requires  a  crew  sta¬ 
tion  member  name  ,  but  no  name  is 
spec  if ied . 

Ignores  the  operation. 

Supply  the  member  name  and  resubmit. 


member  name  NOT 
Reason : 

System  Action: 
User  Action: 


FOUND. 

For  the  DELETE,  DUMP,  PUNCH  or  PRINT 
function,  the  specified  crew  station 
member  name  does  not  exist. 

Prints  the  Crew  Station  Data  Base 
directory. 

Correct  the  error  and  resubmit. 
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CBM107A 


CBM109A 


CBM110A 


CbMlllA 


CBM112A 


CBM113A 


NUMBER  OF  PANELS/ CONTROLS  INVALID  FOR  MEMBER 
membername . 

Reason:  The  number  of  panels  or  controls  as 

specified  on  the  ADD  function  con- 
•  trol  card  ( $ADD)  is  either  less  than 
1  or  greater  than  300. 

System  Action:  Ignores  the  control  card. 

User  Action:  If  the  number  as  specified  is  less 

than  1,  correct  and  resubmit.  If 
the  number  as  specified  is  greater 
than  300,  split  the  crew  station 
definition  into  two  units  and  add 
them  separately. 


axis  FOR  Y  INVALID,  MEMBER  IS  membername. 

Reason:  During  the  ADD  function  ($ADD)  ,  the 

direction  of  the  user's  Y-axis  is 
not  F,  A,  L,  R,  U  or  D. 

System  Action:  Ignores  the  control  card. 

User  Action:  Correct  the  control  card  and  resub¬ 

mit. 


ax  is  FOR  Z  INVALID  ,  MEMBER  IS  membername . 
Reason:  During  the  ADD  function 

direction  of  the  user's 
not  F,  A,  L,  R,  U  or  D. 
System  Action:  Ignores  the  control  card. 
User  Action:  Correct  the  control  card 

mit . 


( $ADD) ,  the 
Z-axis  is 


and  resub- 


X&Y  ,  X&z,  OR  Y&Z 
Reason : 


System  Action: 
User  Action: 


ARE  COLINEAR  FOR  MEMBER  membername. 
The  directions  of  two  or  more  of  the 
user's  axes  are  the  same  (ex.  X=L , 
Y=U  &  Z  =  U  or  X=L  ,  Y=U  &  Z=L)  . 

Ignores  the  control  card. 

Pick  unique  directions  for  the  axes 
and  resubmit. 


DIRECTORY  IS  FULL,  CANNOT  ADD  membername. 


Reason : 


System  Action: 
User  Action: 


No  space  is  available  in  the 
Station  Data  Base  directory  to 
an  entry  for  this  member. 

Ignores  the  control  card. 

Delete  a  member  and  resubmit. 


Crew 

add 


PANEL  IS  ZERO  , 
Reason : 


System  Action: 
User  Action: 


BUT  POINT  IS  NOT  FOR  membername . 

In  defining  a  control,  either  the 
panel  number  and  the  vertex  number 
must  be  zero  ,  or  both  numbers  must 
be  non-zero.  Note  that  blank  entry 
is  converted  to  zero. 

Takes  the  control  definition  as 
absolute . 

Delete  the  crew  station  ,  correct  the 
error  and  resubmit. 
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CBM114A 


CBM115A 


CBM116A 


CBM117A 


CBM119A 


CB  Ml  2  01 


CBM121I 


member  name  ALREADY  EXISTS. 

Reason:  User  tried  to  add  a  crew  station 

definiton  under  a  name  that  already 
exists  on  the  Data  Base. 

System  Action:  Ignores  the  control  card. 

User  Action:  Use  a  new  name,  and  resubmit. 


END  OF  DATA. 
Reason : 

System  Action: 
User  Action: 


The  end  of  file  was  found  before  the 
END  Program  control  card  ($END)  . 
Terminates  the  program. 

Check  to  make  sure  that  all  the 
control  cards  are  processed. 


I/O  ERROR  ON  RECORD  recordnumber  (INDEX) . 

Reason:  An  I/O  error  occurred  on  the  Crew 

Station  Data  Base. 

System  Action:  Terminates  the  program. 

User  Action:  Contact  systems  programmmer. 


I/O  ERROR  ON  RECORD  recordnumber  (DATA) . 

Reason:  An  I/O  error  occurred  on  the  Crew 

Station  Data  Base. 

System  Action:  Terminates  the  program. 

User  Action:  Contact  systems  programmer. 


NEW  MEMBER  , 

member  name  , 

HAS 

nn 

PANELS  AND  nn 

CONTROLS, 
Reason : 

The  user 

added 

a 

crew  station  de- 

finition  to  the  Data  Base. 

System  Action:  The  new  crew  station  is  added  to  the 

Data  Base  . 

User  Action:  None. 


COORDINATES  ARE 
coord  inate . 
Reason : 

System  Action: 
User  Action: 


TRANSLATED  TO  seat  reference  point 

The  user  added  a  crew  station  de¬ 
finition  to  the  Data  Base. 

The  addition  is  accepted. 

None. 


COORDINATES  GIVEN  AS  ax  is  ,  ax  is  AND  ax  is  ARE  NOW  R, 
F  ,  AND  U  . 

Reason:  The  user  added  a  crew  station  de¬ 

finition  to  the  Data  Base. 

System  Action:  The  addition  is  accepted. 

User  Action:  None. 


247 


CB  M122I 


CBM123I 


CBM124I 


CBM125A 


CBM126I 


CBM127A 


CBM128I 


PROGRAM  END. 

Reason:  The  End  Program  function  control 

card  ($END)  or  the  end  of  the  file 
card  is  encountered ,  or  there  is  an 
I/O  error. 

System  Action:  Terminates  the  program. 

User  Action:  Check  to  make  sure  that  all  control 

cards  are  accepted  ,  and  processed 
correctly. 


member  name  DELETED. 

Reason:  The  user  submitted  a  delete  Crew 

Station  Definition  function  control 
card  ($DEL) . 

System  Action:  Makes  the  requested  deletion. 

User  Action:  None. 


INITIALIZED. 
Reason : 

System  Action: 
User  Action: 


The  user  requested  that  the  Crew 
Station  Data  Base  be  initialized. 

The  Data  Base  is  initialized. 

None . 


PANEL  NOT  DEFINED  FOR  CONTROL  controlname. 

Reason:  To  define  a  control,  the  user  speci¬ 

fied  the  control  in  a  panel  not 
found  in  this  crew  station. 

System  Action:  Assumes  that  the  control  is  defined 

absolutely. 

User  Action:  Make  sure  that  the  panel  is  defin¬ 

ed.  Correct  and  resubmit. 

member  name  PUNCHED. 

Reason:  The  user  requested  that  member 

member  name  be  punched  on  cards. 

System  Action:  Punches  the  data. 

User  Action:  None. 


NO  SPACE  ,  CANNOT  ADD  member name . 

Reason:  There  is  not  enough 

data  base  to  hold 
addition. 

System  Action:  Ignores  the  control  car 
User  Action:  Compress  the  Data  Base 


space  in  the 
the  requested 

d. 

and  resubmit. 


member  name  WAS 
Reason : 


System  Action: 
User  Action: 


IN  PLACE. 

The  user  requested  that  the  Data 
Base  be  compressed.  The  member  , 
member name ,  was  already  compressed 
and  not  moved. 

The  named  member  was  not  moved. 

None . 
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CBM1291 


CBM130A 


CBM131A 


CBM132A 


member  name  NOW 
Reason : 


System  Action: 
User  Action: 


IN  PLACE. 

The  user  requested  that  the  Data 
Base  be  compressed.  The  member , 
member name  was  not  in  place  ,  and 
therefore  has  been  moved  to  facili¬ 
tate  compression. 

The  member  is  moved  to  another  loca¬ 
tion  in  the  Data  Base. 

None . 


panelname  USED 
panelnumber? . 
Reason : 


System  Action: 
User  Action: 


IN  PANELS  panelnumber i  AND 

In  the  crew  station  member  defini¬ 
tion,  two  panels  have  the  same 
name.  The  number  of  these  panels 
are  panelnumber  i  and  panel- 
number  2  • 

Both  panels  are  accepted  in  spite  of 
the  duplicate  names. 

Delete  the  definition,  change  one  of 
the  names,  and  resubmit. 


panelname  HAS  SAME  PANEL  NUMBER  AS  panelnumber  . 

Reason:  In  the  crew  station  definition,  two 

panels  have  the  same  panel  number. 

System  Action:  Both  panels  are  acepted.  Note  that 

references  to  the  second  will  cause 
a  reference  to  the  first. 

User  Action:  Delete  the  crew  station  definition, 

correct  the  error,  and  resubmit. 


controlname  IS 
Reason: 

System  Action: 
User  Action: 


A  DUPLICATE  NAME. 

In  adding  a  crew  station  definition, 
two  controls  have  the  same  name. 

Only  the  first  control  can  be  refer¬ 
enced  . 

Delete  the  definition,  change  one  of 
the  names  to  make  it  unique  ,  and 
resubmit. 
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SECTION  6 

COMBIMAN  VISIBILITY  DATA  BASE  MAINTENANCE  PROGRAM  ( CBMVM ) 


One  of  the  important  functions  provided  by  the  interactive 
program  CBM05  is  the  VISIBILITY  PLOT  function.  This  function 
evaluates  the  interaction  of  the  visual  man-model  with  a  crew 
station.  It  uses  the  eye  location  of  the  current  man-model  and 
the  three  dimensional  coordinates  of  selected  crew  stations, 
stored  on  the  Visibility  Data  Base,  to  generate  on-line  plots 
of  the  man-model's  field  of  vision.  Note  that  the  Visibility 
Data  Base  may  contain  the  same  geometric  panels  as  the  Crew 
Station  Data  Base,  or  alternately  a  subset  of  the  Crew  Station 
Data  Base,  or  an  entirely  different  set  of  panels  and 
contours.  A  data  flow  of  the  program  CBMVM  is  shown  in  Figure 
119. 


6.1  AVAILABLE  PROCESSING 

The  program  CBMVM  allows  the  user  to  create  and  maintain 
the  Visibility  Data  Base.  Input  data  are  supplied  on 
80-character  computer  cards  or  card  images  on  magnetic  tape  or 
direct  access  device  and  are  processed  according  to  the  user's 
selection  of  control  commands.  These  commands  allow  the  user 
to  add  or  delete  members,  to  print  information  about  existing 
members,  or  to  list  contents  of  the  Data  Base.  It  can  also  be 
used  to  compress  the  members  within  the  Data  Base  to  maintain 
continuous  blocks  of  available  disk  space. 


The  control  cards  may  be  input  in  any  order  with  one  ex¬ 
ception:  when  the  Data  Base  is  created  for  the  first  time  or 
is  reinitialized,  the  $INT  (initialize)  control  card  must 
precede  all  other  control  cards  and  member  definitions. 
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Figure  119.  Data  Flow  for  Program  CBMVM. 
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6.2  RESTRICTIONS  AND  LIMITATIONS 


A  maximum  of  20  crew  station  members  may  be  added  to  the 
Visibility  Data  Base.  Each  member  may  contain  up  to  15  panels 
or  contours.  The  panels  and  contours  may  consist  of  two  to  100 
vertices.  The  large  number  of  vertices  per  panel  allows  a 
greater  accuracy  of  approximating  curved  edges  than  is  possible 
with  the  Crew  Station  Data  Base.  These  vertices  must  be  input 
in  consecutive  order,  as  described  in  Paragraph  6.3.1. 

The  total  number  of  records  available  for  coordinate 
information  for  members  on  the  Visibility  Data  Base  is  1979. 
Other  limitations  are  described  in  Paragraph  6.2.3. 


6.3  HOW  TO  USE  CBMVM 

The  example  used  to  illustrate  this  program  is  based  on 
the  A7E-01  crew  station  shown  with  the  seated  man-model  as 
shown  in  Figure  4.  The  panels  and  edges  of  the  A7E-01  crew 
station  are  combined  to  produce  a  visibility  member  consisting 
of  three  panels:  the  upper  and  lower  windows,  and  the  cockpit 
canopy.  These  panels  are  shown  in  Figure  120  ,  along  with  the 
three-dimensional  coordinates  used  to  define  points  along  the 
panel  boundaries. 

6.3.1  Input  Data  Specification 

Input  data  format  to  CBMVM  is  similar  to  that  of 
CBMCM,  except  that  the  adjacent  panels  and  edges  can  be 
combined  into  panels  for  input  to  CBMVM. 

The  program  CBMCM  is  set  up  to  accept  any  three 
dimensional  cartesian  coordinate  system.  The  user  must  also 
supply  the  program  with  the  three-dimensional  coordinates  of 
the  Seat  Reference  Point  (SRP)  with  respect  to  the  origin  of 
crew  station  coordinate  system. 
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Figure  120.  X,  Y  and  Z  Coordinates  of  A7E-01  Boundaries 
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Directions  of  the  x,  y,  and  z  axes  are  A  for  Aft, 
F  for  Forward,  L  for  Left,  R  for  Right,  U  for  Up,  and  D  for 
Down.  CBMVM  converts  the  given  coordinates  to  the  COMBIMAN 
coordinate  system  (x=F,  y=L  ,  z=U  ,  and  SRP=  (0  ,0  ,0)  )  .  (See 
Figure  120.) 


The  maximum  number  of  vertices  allowed  for  each 
panel  of  the  crew  station  is  100.  These  vertices  must  be  input 
consecutively,  going  either  clockwise  or  counterclockwise  along 
the  perimeter  of  the  panel  as  explained  in  Paragraph  6. 3. 2.1. 

o.3.2  Processing  Specification 

The  functions  available  to  CBMVM  users  are  the 
same  as  those  tor  program  CBMCM  excluding  the  one  to  punch  a 
member.  The  function  request  formats  are  punched  one  request 
per  card  and  are  shown  in  Figure  121.  All  control  cards  can  be 
used  anytime  in  any  order  except  that  the  $INT  card  must  be  the 
first  control  card  to  initialize  or  r e- in  it ial  ize  the  Data 
Base.  The  format  and  necessary  parameters  of  the  control  cards 
are  explained  in  the  following  paragraphs. 

6. 3. 2.1  ADD  VISIBILITY  MEMBER  Function 

&  ADD  member  name  type  nbnds  srpx  srpy 
srpz  x  ^  z  xx  YX  z_z  (followed  by 
visibility  member  definition). 

The  ADD  VISIBILITY  MEMBER  function  adds 
the  input  data  under  the  member  name  member  name  to  the 
Visibility  Data  Base.  The  me mbe r na me  is  limited  to  a  length  of 
eight  characters.  Type  is  a  two-digit  right  justified  integer 
that  can  be  either  0  or  1.  If  type=0 ,  the  program  checks  the 
panel  vertices  for  clockwise  or  counterclockwise  entries. 
Type=l  avoids  this  test.  Nbnds  is  a  right  justified 
three-digit  integer,  which  specifies  the  number  of  panels 
associated  with  a  membername.  The  SRP  coordinates  are  srpx  , 
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Figure  123.  Program  CBMVM  Member  Card  Format  for  Coordinates 


srpy ,  and  srpz  and  are  entered  as  real  numbers  in  F6.2  format. 
A  decimal  point,  if  omitted,  is  inserted  by  the  program  in 
between  the  second  and  third  digits  from  the  right.  X,  Y,  and 
Z  indicate  the  directions  of  the  positive  x,  y,  and  z 
coordinates  respectively,  (A,  F,  L,  R,  U  or  D)  .  x>c,  yy ,  zz  are 
two  letter  abbreviations  for  the  axis  labels  and  directions  of 
the  input  coordinate  system  when  the  operator  is  seated  in  the 
crew  station.  Examples  of  these  values  are  FS  (Fuselage 
Station-aft),  WL  ( WaterLine-up) ,  or  BL  ( ButtLine-r ight ) . 

Each  panel  is  defined  by  a  card 
containing  its  sequence  number  ( seq . # ) ,  panelname ,  and  number 
of  coordinates  (#  coord)  within  the  panel  on  one  card  and  xyz 
coordinates  of  each  vertex  on  separate  cards.  Figures  122  and 
123  show  the  format  for  these  input  cards. 

Seq. #  and  #  coord  are  3-digit  right 
justified  integers;  the  panelname  can  be  up  to  28  characters 
long.  The  three-dimensional  coordinates  of  vertices  are  input 
as  real  numbers  in  F6.2  format,  one  set  to  a  card.  A  decimal 
point,  if  omitted,  is  inserted  between  the  second  and  the  third 
digits  from  the  right. 


An  example  of  the  ADD  VISIBILITY  MEMBER 
function  is  shown  in  Figure  124.  The  first  outlined  area  con¬ 
tains  the  &ADD  control  card.  The  associated  panels  consist  of 
a  panel  name  card  (area  2)  followed  by  the  specified  number  of 


three-dimensional  coordinate 
outlined  area. 


data  cards  shown  in  the  third 


If  the  program  detects  an  error  in  the 
input  data  the  member  will  not  be  added  to  the  Data  Base. 
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232  L2 

568 

12764 

23444 

541 

12903 

23  731 

470 

13059 

2394  1 

40  5 

13173 

24109 

292 

13286 

24212 

200 

13341 

24212 

000 

13341 
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-292 

13236 
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—*♦05 

13  L  73 

23731 
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23444 
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12901 

23212 
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12734 

23000 

-576 

1 2oo  5 

22  763 

-584 

12535 

003C0CKP I T  CANOPY  ClcARLINE  1  92 

29  447 

000 

13550 

29404 

247 

13460 

293  o  1 

622 

1332  o 

29322 

832 

13201 

29  2o  1 

1054 

13024 

29209 

124j 

12860 

29162 

1378 

12700 

29  114 

1503 

12557 

2906  7 

1569 

12415 

29u02 

1730 

* 

• 

12238 

29209 

* 

-  L  24  3 

12658 

292ol 

-  1054 

1  3024 

29322 

-  332 

13201 

2936  1 

-  622 

13  326 

29404 

-  247 

1 3  4o  0 

29  44  7 

000 

13  550 

Figure  124.  Sample  Data  for  $ADD  Member  Function. 
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6.3.2 .2 


CHECK  VISIBILITY  MEMBER  Function 


&CHK  member  name  type  nbnds  srpx  sr py  srp 
x  ^  z  xx  ^  zz  (followed  by  visibility 
crew  station  definition). 

The  CHECK  VISIBILITY  MEMBER  function 

operates  in  the  same  way  the  ADD  VISIBILITY  MEMBER  function 
does  except  that  the  member  is  not  added  ,  but  is  only  checked 
for  errors. 

b.3.2.3  DELETE  VISIBILITY  MEMBER  Function 
&DEL  member  name 

The  DELETE  VISIBILITY  MEMBER  function 

removes  a  given  membername  from  the  Data  Base.  In  order  to 
make  the  space  occupied  by  the  deleted  member  available, 

COMPRESS  VISIBILITY  DATA  BASE  function  must  be  used. 

6. 3. 2. 4  COMPRESS  VISIBILITY  DATA  BASE  Function 

&CMP 

The  COMPRESS  VISIBILITY  DATA  BASE 
function  compresses  used  space  and  maximizes  the  continuous 
unused  space  in  the  Visibility  Data  Base. 

If  the  message  "CBM527A  NO  SPACE  ,  CANNOT 
ADD  member  name"  is  encountered  during  an  &ADD  operation,  it  is 
necessary  to  use  compress  function  first  and  then  attempt  to 

add  again.  It  the  message  reappears,  the  Data  Base  is  full. 
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6. 3. 2. 5  DUMP  VISIBILITY  MEMBER  Function 


&DMP  member name  or 
S.DMP 

The  DUMP  VISIBILITY  MEMBER  function 
prints  the  contents  of  the  specified  visibility  member 
membername  or  by  default  prints  the  entire  Visibility  Data  Base 
if  no  member  name  is  specified.  The  format  of  the  output  is  as 
follows : 

RECORD  nn 

+=+  first  half  of  record  in  EBCDIC  +=+ 

+=+  second  half  of  record  in  EBCDIC  +=+ 


+=+  complete  +=+ 
+=+  record  +=+ 
+=+  in  +=+ 
+=+  Hexadecimal  +=+ 


where : 

nn  -  is  the  sequence  number  of  the  record  on  the  Data 
Base  and 

+=+  -  is  delimeter  for  the  data. 

This  function  is  primarily  used  as  a 
debugging  aid  for  Input/Output  errors. 

6. 3. 2. 6  PRINT  VISIBILITY  MEMBER  Function 

&PRT  membername  or 

&PRT 

The  PRINT  VISIBILITY  MEMBER  function 
prints  the  data  contained  in  the  specified  membername  in  a 
format  similar  to  the  input  to  the  ADD  VISIBILITY  MEMBER 
function.  Specifying  no  name  or  a  nonexistent  name  causes  a 
printout  of  the  list  of  members  and  their  extents  on  the  Data 
Base,  as  well  as  the  origin  and  orientations  of  their 
coordinate  data. 
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6. 3. 2. 7 


INITIALIZE  VISIBILITY  MEMBER  Function 


&INT 

The  INITIALIZE  VISIBILITY  MEMBER 
function  is  used  primarily  to  establish  a  Data  Base,  although 
it  may  be  used  to  return  the  data  base  to  its  original  unused 
state . 


6. 3. 2. 8  END  PROGRAM  Function 

&END 

The  END  PROGRAM  function  terminates 
execution  of  the  program  CBMVM. 

6.3.3  Submitting  a  Processing  Request 

The  sequence  of  Job  Control  Language  (JCL)  cards 
needed  to  execute  the  program  CBMVM  are  shown  in  Figure  125. 
Initialization  of  the  Data  Base  for  the  first  time  requires 
allocation  of  space  on  disk  for  the  Data  Base  and  is 
accomplished  by  the  "//FT09F001  DD"  cards  shown  in  Figure  126 
and  the  $INT  control  card  initializes  the  Data  Base.  The 
"//FT09F001  Dpn  car3  Figure  125  is  used  for  all  subsequent 
processing  requests.  The  &END  control  card  is  always  the  last 
control  card  and  it  ends  the  program  CBMVM. 

6.3.4  Output  Data  Interpretation 

Output  generated  by  the  program  CBMVM,  which 
controls  page  formatting  and  identifies  each  page  with  the 
source  program  name  (CBMVM)  ,  date,  and  time  of  program 
execution,  and  page  number,  falls  into  five  format  types. 
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COMB I MAN. VIS DATA  and  Execute  Program 
CBMVM. 


The  first  type  of  output  is  generated  by  the  &INT, 
&CMP ,  &DEL  and  &ENO  functions.  The  output  for  these  functions 
indicates  the  start  and  end  of  processing  associated  with  the 
specified  function.  The  COMPRESS  function,  however,  generates 
additional  messages  indicating  that  a  certain  member  was,  or 
was  not,  moved  in  the  process  of  combining  unused  space.  An 
example  of  this  format,  for  the  COMPRESS  function,  is  shown  in 
Figure  127. 


The  second  type  of  output  is  generated  by  the 
PRINT  function  with  a  blank  membername  field.  This  causes  a 
listing  of  the  entries  in  the  directory  of  the  Data  Base  in  the 
following  format: 

nn . )  membername,  EXTENT  (nl,  n2)  ,  nb  PANELS, 

ORIGIN  =  (x,y,z)  ,  ORIENT  =  (a  ,b  ,c)  , 

AXES  HEADINGS  =  (xx ,  yy ,  zz) 

wner  e : 


nn  identifies  the  record  number  of  the 

member  within  the  directory 


membername 

is  the  8  character  name  of  the  member  at 
record  nn 

nl 

is  the  location  of  first  record  of 
membername 

n2 

is  the  location  of  last  record  of 

membername 

nb 

is  the  number  of  panels  associated  with 

the  member 

X 

is  the  location  of  the  SRP  in  the 

Y 

z 

original  coordinate  system 

a 

are  the  original  orientation  of  the 

b 

positive  x,  y  and  z  axes,  respectively. 

c 

XX 

are  the  original  axes  headings  for  the 

YY 

positive  x,  y  and  z  axes,  respectively. 

zz 
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This  information  was  originally  supplied  to  the 
Data  Base  by  the  &ADD  control  card.  An  example  of  the  output 
of  the  &PRT  function  is  shown  in  Figure  128. 

The  third  type  of  output  is  generated  by  the  DUMP 
function.  For  the  member  specified  on  the  &DMP  control  card, 
the  directory  information  in  the  second  format  is  printed 
first.  It  is  followed  by  records  of  the  member  printed  in  the 
format  shown  in  Paragraph  6. 3. 2. 5.  The  record  in  EBCDIC  is 
printed  in  a  30A4  format  and  for  the  hexadecimal  output,  15Z8 
format  is  used. 


The  DUMP  function  is  used  primarily  as  a  debugging 
aid  for  Input/Output  errors.  An  example  of  the  DUMP  functon 
output  is  shown  in  Figure  129. 


The  fourth  output  format  is  used  by  the  CHECK  and 
ADD  functions.  The  first  item  printed  out  is  a  reformatting  of 
the  information  on  the  control  card.  Then,  each  panel 
definition  along  with  its  input  and  absolute  coordinates  are 
printed.  The  format  is: 


nn.)  bndnm ,nv  VERTICEb  -  INPUT  COORD- -ABSOLUTE  COORD-- 
(xll»  Yll'  zll)  to  ( X21  '  Y 21'  z2l) 

II  II  II  II  II  II 

II  II  II  II  II  II 

( xlnv  'Y lnv  ,zlnv )  to  (x2nv 'Y2nv 'z2nv) 

where : 


nn 

bndnm 

nv 

X1  i  'Yli  *z  1  i 

x2  i  »Y2 i  'z2  i 


is  the  panel  sequence  number 

is  the  boundary  name  (8  characters  or 
less) 

is  the  number  of  vertices  for  the  panel 

coordinate  of  ith  vertex  of  the  panel  in 
the  original  system  of  coordinates 
(  i=l  ,nv) 

coordinates  of  the  ith  vertex  of  the 
panel,  converted  to  the  COMBIMAN 
coordinate  system  (  i=l  ,nv) 
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An  example  of  the  output  generated  by  the  &ADD 
function  is  shown  in  Figure  130. 


The  fifth  and  last  format  is  used  by  the  PRINT 
function  output.  In  this  output  the  original  input  coordinates 
are  not  printed.  The  directory  information  is  printed  first 
and  is  followed  by  the  panel  definition  data. 

nn. )  bndnm,  nv  VERTICES  —  ABSOLUTE  COORDINATES 

(xl*  Y If  zi) 


where : 


(xnv/  Ynv' 


znv ) 


nn  is  the  panel  sequence  number 

bndnm  is  the  panel  name  (8  characters  or  less) 

nv  is  the  number  of  vertices  which 

constitute  the  panel 

An  example  of  this  format  is  shown  in  Figure  131. 


6.4  PROGRAM  MESSAGES  -  INCLUDING  ERROR  CORRECTION 

The  program  CBMVM  prints  out  information  and  action 
related  messages.  The  message  format  is: 

CBM5nni  message  text 
where : 

nn  is  the  message  number 

i  indicates  the  action  code 

( I=inf ormat ional ,  A=action  to  be 

performed ) . 

message  text  is  the  text  of  the  message. 
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Figure  130.  A  Sample  Output  of  CBMVM  &ADD  Function. 
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Figure  131.  A  Sample  Output  of  CBMVtl  &PRT  Function. 


CBM500I 


CBM501A 


CBM503A 


CBM505A 


CBM506A 


CBM507A 


CBM508A 


control  card  image 

Reason:  User  has  submitted  a  control  card. 

System  Action:  Reads  the  control  card. 

User  Action:  None. 


operation  UNKNOWN  OPERATION. 

Reason:  The  operation  on  the  control  card 

(shown  in  the  previous  CBM500I 
message)  is  unknown. 

System  Action:  This  control  card  is  ignored. 

User  Action:  Correct  the  card  and  resubmit. 


ver texnumber  INVALID  VERTEX  NUMBER  FOR  POINT 
panelname. 

Reason:  The  order  in  which  the  vertices  are 

given  is  not  in  a  clockwise  or 
counterclockwise  direction. 

System  Action:  Vertex  number  1  is  used. 

User  Action:  Delete  the  member,  correct  the  error 

and  resubmit. 


NO  NAME  GIVEN  , 
Reason : 

System  Action: 
User  Action: 


oper at  ion  IGNORED. 

Tnis  operation  requires  a  member 
name,  but  none  was  supplied. 

The  operation  is  ignored. 

Supply  the  member  name  and  resubmit. 


member  name  NOT 
Reason : 

System  Action: 
User  Action: 


FOUND. 

For  the  Delete  function  (&DEL)  ,  Dump 
function  (&DMP)  ,  or  Print  function 
(&PRT)  the  specified  visibility 
member  name  does  not  exist. 

The  directory  of  the  visibility  data 
base  is  printed,  instead  of 
performing  the  requested  function. 
Check  the  control  card  for 
nonexistent  member  name. 


NUMBER  OF  PANELS  INVALID  FOR  MEMBER  member  name . 

Reason:  The  number  of  panels  as  specified  on 

the  ADD  function  control  card  (&ADD) 
is  either  less  than  1  or  greater 
than  15. 

System  Action:  The  control  card  is  ignored. 

User  Action:  Correct  and  resubmit. 

axis  FOR  X  INVALID,  MEMBER  IS  member  name . 

Reason:  During  the  Add  function  ( &ADD)  the 

direction  of  the  user's  X-axis  is 
not  F,  A,  L,  R,  U  or  D. 

System  Action:  The  control  card  is  ignored. 

User  Action:  Correct  and  resubmit. 
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CBM509A 


CBM510A 


CBM511A 


CBM512A 


CBM514A 


CBM515A 


CBM516A 


CBM517A 


axis  FOR  Y  INVALID,  MEMBER  IS  member  name . 

Reason:  During  the  Add  function  (&ADD)  ,  the 

direction  of  the  user's  Y-axis  is 
not  F,  A,  L,  R,  U  or  D. 

System  Action:  The  control  card  is  ignored. 

User  Action:  Correct  and  resubmit. 


axis  FOR  Z  INVALID,  MEMBER  IS  member  name . 

Reason:  During  the  Add  function  (&ADD)  ,  the 

direction  of  the  user's  Z-axis  is 
not  F,  A,  L,  R,  U  or  D. 

System  Action:  The  control  card  is  ignored. 

User  Action:  Correct  and  resubmit. 


X&Y ,  X&Z  OR  Y&Z 
Reason : 

System  Action: 
User  Action: 


ARE  COLLINEAR  FOR  MEMBER  me mber  name  . 
The  directions  of  two  axes  are  the 
same  (ex.  X=L  ,  Y=U  ,  and  Z=U). 

The  control  card  is  ignored. 

Pick  unique  directions  for  the  axes 
and  resubmit. 


DIRECTORY  IS  FULL,  CANNOT  ADD  membername. 

Reason:  No  space  is  left  in  the  Visibility 

Data  Base  directory  to  add  an  entry 
for  this  member.  The  directory  can 
hold  only  20  membernames. 

System  Action:  The  control  card  is  ignored. 

User  Action:  Delete  one  or  more  members,  compress 

the  Data  Base  ,  and  resubmit. 


membername  ALREADY  EXISTS. 

Reason :  User  has  tried  to  add  a 


definition  under  a  name  that 
in  the  Data  Base. 

System  Action:  The  control  card  is  ignored. 
User  Action:  Use  a  new  name,  and  resubmit. 


member 

exists 


END  OF  DATA. 
Reason : 

System  Action: 
User  Action: 


The  end  of  file  was  found  before  the 
END  Program  control  card  (SEND) . 

The  program  is  ended. 

Check  to  make  sure  that  all  the 
control  cards  are  processed. 


I/O  ERROR  ON  RECORD  recordnumber  (INDEX) . 

Reason:  An  I/O  error  occurred  on  the 

Visibility  Data  Base. 

System  Action:  Terminates  the  program. 

User  Action:  Contact  Systems  Programmer. 


I/O  ERROR  ON  RECORD  recordnumber  (DATA) . 

Reason:  An  I/O  error  occurred  on  the 

Visibility  Data  Base. 

System  Action:  Terminates  the  program. 

User  Action:  Contact  systems  programmer. 
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CBM519I 


CBM5  20I 


CBM521I 


CBN622I 


CBM523I 


CBM524I 


CB  M5  27A 


CBM528I 


NEW  MEMBER,  membername  ,  HAS  nn  PANELS. 

Reason:  The  user  has  added  a  member 

definition  to  the  Data  Base. 

System  Action:  The  addition  is  accepted. 

User  Action:  None. 

COORDINATES  ARE  TRANSLATED  TO  seat  reference  point 
coordinate. 

Reason:  The  user  added  a  member  definition 

to  the  Data  Base. 

System  Action:  The  addition  is  accepted. 

User  Action:  None. 

COORDINATES  GIVEN  AS  axis ,  axis  AND  axis  ARE  NOW  F, 
L  ,  and  U . 

Reason:  The  user  added  a  member  definition 

to  the  Data  Base. 

System  Action:  The  addition  is  accepted. 

User  Action:  None. 


AXES  HEADINGS  ARE  xx  ,  ,  AND  zz. 

Reason:  The  user  added  a  member  definition 

to  the  Data  Base. 

System  Action:  The  addition  is  accepted. 

User  Action:  None. 


membername  DELETED. 

Reason:  The  user  submitted  a  DELETE  function 

control  card  (&DEL) . 

System  Action:  The  membername  is  deleted. 

User  Action:  None. 


INITIALIZED. 
Reason : 


System  Action: 
User  Action: 


The  user  requested  that  the 
Visibility  Data  Base  be  initialized 
using  the  Initialize  Visibility  Data 
Base  Function  (&INT) . 

The  Data  Base  is  initialized. 

None . 


NO  SPACE,  CANNOT  ADD  membername, 


Reason : 


System  Action: 
User  Action: 


space  in  the 
the  requested 


There  is  not  enough 
data  base  to  hold 
add  it  ion. 

The  control  card  is  ignored. 
Compress  the  Data  Base  and  resubmit 


member  name  WAS 
Reason : 


System  Action: 
User  Action: 


IN  PLACE. 

The  user  requested  the  Data  Base  be 
compressed.  The  member  ,  membername 
was  already  compressed ,  and  not 
moved . 

The  member  was  not  moved. 

None . 
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CBM529I 


CBM531A 


CBM532I 


CBM534I 


CBM53  5A 


CB  M5  36 1 


CBM537A 


member  name  NOW  IN  PLACE. 

Reason:  The  user  requested  the  Data  Base  be 

compressed  ,  the  member  ,  membername 
was  not  in  place,  and  therefore  was 
moved . 

System  Action:  The  Data  Base  is  compressed. 

User  Action:  None. 


panelname  HAS 
Reason : 


System  Action: 


User  Action: 


SAME  NUMBER  AS  panelname. 

While  adding  a  contour  definition, 
two  panels  have  the  same  panel 
number . 

Both  panels  are  accepted.  Note  that 
references  to  the  second  will  cause 
a  reference  to  the  first. 

Delete  the  member  definition, 
correct  the  error,  and  resubmit. 


PROGRAM  END. 
Reason : 


System  Action: 
User  Action: 


The  End  Program  function  control 
(&.END)  card,  or  an  end  of  file  is 
encountered  ,  or  there  is  an  I/O 
error  ,  or  there  is  an  unknown 
operation. 

Terminates  program. 

Make  sure  that  all  control  cards  are 
accepted,  and  processed  correctly. 


membername  WITH  nn  PANELS  HAS  BEEN  ADDED. 

Reason:  Member  has  been  successfully  added. 

System  Action:  Reads  next  control  card. 

User  Action:  None. 


membername  NOT 
Reason : 

System  Action: 
User  Action: 


ADDED  DUE  TO  nn  ERRORS. 

During  &ADD  operation,  the  system 
found  nn  errors. 

Reads  next  control  card;  member  is 
not  added. 

Correct  error  and  resubmit. 


MEMBER  membername  CHECKED,  nn  ERRORS. 

Reason:  During  &CHK  ,  the  system  found  nn 

errors . 

System  Action:  Reads  next  control  card. 

User  Action:  Correct  and  resubmit. 

DATA  BASE  IS  NOT  VISIBILITY  DATA  BASE. 

Reason:  First  record  in  directory  contains  a 

keyword  'IVIS'  to  identify  a 
Visibility  Data  Base.  We  accessed  a 
data  set  without  that  keyword. 

System  Action:  Terminates  program. 

User  Action:  Check  JCL  cards  and  access  correct 

data  set. 
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APPENDIX  A 


COMBIMAN  DISTRIBUTION  TAPE  DOCUMENTATION 


A.  CGNTENJS 

CCMclMAN  DISTRIBUTION  TAPE  IS  AN  IBM  STANDARD  LABEL, 
MNE  TRACK,  16C0BP1,  DENSITY  =  3  ,  PARI  TY=CDD,  IEHMOVE  TAPE 
CCNTA1MNG  TvC  PARTITIONED  DATA  SETS  AND  SIX  SEQUENTIAL 
DATA  SETS.  THE  VOLUME  SERIAL  FUR  THE  DISTRIBUTION  TAPE 


TAPc  IS  CBMTPE.  THE  DA  I A  CONTROL  BLOCK  PARAMETERS  GF  THE 


DATA  SETS  ARE  DESCRIBED  IN 

ThE  F 

OLLOW I NG 

TABLE. 

dataset 

file  lrecl 

RECHM  BLK  SIZE 

CkGANI ZATiuN 

COMB  I  MAN . T  PDLCMNT 

I 

BC 

FB 

3200 

SECUENTI AL 

COMBIMAN. LCACLIB 

2 

U 

13030 

PART  IT IONED 

COMBIMAN. DSTRBSRC 

3 

80 

F  5 

3200 

PARTITIONED 

COMB  I  M.  AN  .  ANT  H  CAT  A 

4 

24  6 

FB 

248 

SEQUENTIAL 

CGMB  I  M  A.N  .CRST  CAT  A 

c 

368 

FB 

36B 

SEQUENTIAL 

COMB  1 M AN . I M T  DAT  A 

fc 

150 

V3S 

3200 

SEQUENTIAL 

CCMdIMAN.SMPLANTH 

7 

6  C 

FB 

3200 

SEQUENTIAL 

CuMB I  MAN .V 1SCAT  A 

a 

24  C 

FB 

240 

SEQUENTI AL 

THE  FIRST  F  ILE 

ON  T  Ft 

TAPE 

IS  A  SEQUENTIAL 

FILE  AND 

CONTAINS  THE  DESCRIPTION  CF 

THE 

DATA  SETS 

ON  THE 

TAPE  AND 

the  installation  procedure 

IN  CARC  IMAGE 

FORMAT. 

THE  SECOND  FILE  CONTAINS  THE  LOAD  MODULES  CBM05,  CtiMAM, 
CdMCM,  AND  CBKVM  AS  MEMBERS  OF  THE  PARTITIONED  DATA  SET 
COMdIMAN.LCADLIB.  LINK  EDIT  MAPS  UF  THESE  LOAD  MODULES  ARE 
GIVEN  IN  APPENDIX  B- 1 ,  -2,  -3,  AND  -4. 

FILE  3  CONTAINS  SOURCE  MODULES  CBMCP2,  CBMCP3,  CBMCP4, 
CBMVS1,  CBMOFF,  CBMCM,  AND  LBMOFF  AS  MEMBERS  UF  A  PARTITIONED 
DATA  S  El  COMBIMAN. DSTRBSRC.  THE  GRAPHIC  SUBROUTINE  CALLS  IN 
C8MCP2,  CBMCP3,  CBMCP4,  CBMVS1,  AND  IBMGLD  ARE  WRITTEN  TO  BE 
EXECUTED  ON  AN  ON-LINE  GCOLD  5COC  ELECTROSTATIC  PLOTTER.  THE 
USEkS  KAY  hAVE  TO  CHANGE  THESE  CODES  AND  COMPILE  AND  LINK  EDIT 
THESE  SUBROUTINES  TC  CBMC5  TO  USE  THE  PLOTTER  AT  ThEIR  SITE. 
CBMOt-F,  THE  FIFTh  MtMBER,  IS  THE  OFFLINE  PLOT  ROUTINE.  IT 
USES  DATA  GENERATED  CN  UMT  11  DURING  A  COMBIMAN  RUN  WHEN  PFK 7 
IS  ACTIVATED  TO  GET  AN  OFF-LINE  PLOT  CF  COMBIMAN.  THE  CODE  IN 
C5KOFF  MODULE  IS  WRITTEN  FOR  A  LALCCMP  PLOTTER  DRIVEN  BY  A  CDC 
COMPUTER.  ThE  SIXTH  MEMBER,  CBMCM,  HAS  THE  SOURCE  LISTING 
OF  THE  MAIN  ROUTINE  WHICH  MAINTAINS  THE  CREw  STATlGN  DATA 
EASE  (CBMCOM).  THIS  MODULE  MAY  BE  ALTERED  TO  SUIT  THE 
DATA  ENTRY  OR  DIGITIZING  PROCEDURES  AT  THE  USER'S  FACILITIES 
TO  ADD  NEW  CREw  STATION  DATA  OR  TC  MODIFY  EXISTING  MEMBERS. 

THE  SEVENTH  MEMdER  IN  THE  DATA  SET  IS  THE  SOURCE  LISTING  OF 
TnE  ASSEMBLER  SUBROUTINE  IBMGLD.  IBMGLD  IS  CALLED  FROM  THE 
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S  0  B^&U  TINE  GSPGLC  TC  CONVERT  THE  IBM  2250  GRAPHIC  ORDERS  TC 
GOULD  TYPE  PLOT  ORDERS.  LISTINGS  lF  THESE  SOURCE  MODULE  S  ARE 
GIVEN  IN  APPENDIX  C. 

files  4  through  s  are  sequential  data  sets  and  contain 

DATA  NECESSARY  TO  EXEoUTt  CBMC5.  IN  FILE  FOUR  THE  DATA  SET 
COMBI  VAN. ANTHDAT  A ,  DESCR  lBtD  IN  SECTION  4,  hAS  THE  ANTHROPO¬ 
METRIC  SURVEY  AND  REGRESSION  DATA  FOR  1967  USAF  PILOTS,  1968 
U5 Ah  *C^tN,  1966  LS A F  W OMEN  FUrERS,  1964  US  NAVY  FLYERS,  AND 
1 97J  US  ARMY  P1LL1S.  THE  JCL  CaRDS,  PROGRAM  UCJNTRCL  CARDS, 
mND  DATm  NECESSARY  TC  C  R  E A  I E  THIS  DATA  SET  ARE  LISTED  IN 
APPcNC  IX  D. 

FILE  5  FAS  THE  COMB  IMAN . CR S T D AT A  DATA  SET  wHICH  CONTAINS 
THE  SEAT,  PANEL,  ANC  CONTROL  CATA  FOR  THE  A7E-01  CREW  STATION 
CONFIGURATION.  THE  JCL  CARDS,  CONTROL  CARDS,  AND  DATA  USED  TO 
CREATE  THIS  DATA  SET  ARE  IN  APPENDIX  c . 

FILE  6  FAS  THE  CATA  SET  COM d I  MAN .  I N I  TO AT  A  WhICE  CuNTAINS 
DATm  NECESSaRY  TO  GENERATE  THE  CCMBIMAN  LINK  SYSTFM  AND  PROMPT 
INC  MESSAGES. 

FILE  l  HAS  THE  CATA  SET  C  CM  d  I  MAN  .  SM, PL  ANTH  WHICH  CONTAINS 
18  SETS  OF  SAMPLE  ANTHROPOMETRY  FCR  THE  CARD  INPUT  OPTION  LF 
THE  INPUT  12  ANTHRoPCMETRIC  DIMENSIONS  FUNCTION  (SEE  SECTION 
2.2.12  AND  FIGURE  40  OF  I  HE  USER'S  GLIDE). 

FILE  8  HAS  THE  CATA  SET  C  CM  j  1  MAN  .  VI  SO  AT  A  WHICH  CONTAINS 
THE  VISIBILITY  UmTA  (SEE  SECTION  6  OF  COMB  I  MAN  USER'S  GUIDE) 
FOR  THE  A7F-01  CREW  STATION  CONFIGURATION.  ThE  JCL  CAROS,  CGN 
TRCL  CARDS,  AND  DATA  USED  TC  CREATE  THIS  DA  Ta  SET  ARE  IN  AP¬ 
PENDIX  F. 


8 .  INSTALLATION  PROCEDURE 

TFF  GENERAL  PROCEDURE  DESCRIBED  HERE  TO  COPY  A  DATA  SET 
FROM  CCMdIMAN  DISTRIBUTION  TAPE  TO  DISK  CONSISTS  uF  TwO  STEPS. 
TFE  FIRST  STEP  ALLOCATES  SPACE  FOR  THE  OATA  SET  TO  DISK  USING 
PGM-IEFBR14.  THE  SECOND  STEP  COPIES  THE  DATA  SET  TO  DISK 
USING  PG  M= I EHMOV  E .  ThlS  PROCEDURE  IS  SUGGESTED  BECAUSE  THE 
UTILITY  IEHMOVE  MAY  NOT  ALLOCATE  SUFFICIENT  SPACE  TL  LOAD 
LARGE  CATA  SETS. 


//ALLOCATE  JOB 

//ALLCC  EXEC  PGM= I E  F  ER I  4 

//DO  I  DD  DS  N=CCiMt)  I  MAN  .  TP  DGC  MNT  ,DI  SP=  (NEW,  CATLG,  DELETE) 

//  SPACE=(TRK»( 1,1) ), LM T=DISK»VOL=SEK= VOLUME, 

//  DCb= ( RECFM=F6,LRECL=80,bLKSIZE=3200) 

// 


* 
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THE  ' VC  LOME '  IN  VCL  =  S  ER  =  VGL  CM  E  SHCGLD  EE  CHANGED  TG  REFLECT 
THE  DISK  VOLUME. 

THE  DbB  PARADE  T  E  HS  FDR  ALL  TFE  bATA  SETS  ARE  GIVEN  IN  THE 
TAdLE  IN  SECTION  A  OF  THIS  APPENDIX.  THE  SPACE  PARAMETERS  FOR 
THE  DATA  SETS  ARE: 


DATASET 

CCM31MAN.TPDCCM.KT 
CCMb  I  MAN  .LbADL  1  B 
CCMUIMAN. SOURCE 
CCMB  IRAN  .ANTFDATA 
CCMb  I  MAN  .CkSTOATA 
C  CM  B  I  M1  A  .  I N  I  T D  A  T  A 
CCMBIMAN.SMPLANTH 
CCMb IMAN .V l SCAT  A 


SPACE  PARAMETER 

( TPK  ,(  ltl)) 

( TRK  ,  ( 20, 10,5)  ) 
( TRK, ( 5,1 ,2) ) 

( 24b  *2G00 ) 

( 366,2000 ) 

( TRK  ,(  I,  I  )  ) 

( TRK  ,{  1,1)1 
( 240,2000  ) 


THE  J  CL  TL  CCPY  A  PARTITIONED  DATA  SET,  COM  El  MAN. LO ADL1 B , 
FROM  CEMTPE  FILE  2  IS: 


//LCPYPOS  JCE 

//COPY  EXEC  PGM-  IEHMCVE 

//SYSPRINT  DO  SYSCUT=A 

//SYSLT1  DO  UN  1T= SYSDA , SPAC E=( TRK, l I  ,1 ) ) , DISP=LLD 
//CoWPE  DD  UNIT=T  APE,  VCL=  (  PRI  VATE,  RETAIN  ,SER=CBMTPE) , 

//  D  I  SP=  C LD 

//lBHDSK  DC  LN1T=DISK, VCL=SER=VCLUME,DISP=CLD 

//SYSIN  DD  * 

LCPY  PDS=COMEIMAN.LCAJL  It,FRCM=TAPE= l CBM  TP E,  2) , T0  =  D1SK= VOLUME 


/* 

// 


THE  JCL  TC  CGPY  A  SEQUENTIAL  DATA  SET,  CblKB  IMAN  .  ANTHDATA  , 
FRCM  CBMTPE  FILE  4  IS: 


//CUPYSEC 

//COPY 

//SYSPRINT 

//SYSLT1 

//CbMTPE 

// 


JOE 

EXEC  PGM= I EHMCVE 
DD  S Y  SCOT  =  A 

DD  UNIT=SYSUA,SPACE=(TRK, (1,1) ),DISP=CLD 
DD  UN IT=TAPE, VCL=( PRI VATE , RETAIN , SER=CBMIPE ) , 
D I SP=CLD 


//CBMDSK  DD  UNlT=CISK,VoL=SER=VLLUME,DlSP=£LD 

//SYSIN  DC  * 

CCPY  CS  NAME=  COMBI  MAN1.  AN THDAT A  , F RGM=T  A  PE=(  CBMTPE  ,4)  , 


TC=DISk=VCLOME 


/* 

// 


* 
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LINKAGE  EDITOR  MAP  OF  CBM05 
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APPENDIX  C-l 

COMBIMAN  SOURCE  -  CBMCP2  LISTING 


c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 


c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 


SUBROUTINE  C6MCP2(X,Y) 

********************************* 

C8MCP2  -  PLOTS  MAN-MODEL  AND  CREW  STATION  ON  GCOLU  PLOTTER 
CALLEO  BY  - 

CfcMCPl  -  MAIN  COMBIMAN  PLOT  ROUTINE 
C6MUP4  -  HEADING  PLOT  ROUTINE 

CALLS  - 

PLOT  -  CALUCMP  RCUTINE  (CRA*  LINE) 

SYMBOL  -  GOULT1  CHARACTER  PLOT  RCUTINE 


OUTPUT  TO  - 
UNIT  S 


PLOTTER  CATA 


PARAMETERS  - 

X  -  AkRAY  OF  X  VAlLES  TO  BE  PLOTTED 
Y  -  ARRAY  OF  Y  VALUES  TO  BE  PLCTTEC 

********************************* 

COMMON  //  CEMbXY  //  MAN- MODEL  XYZ  DATA 

PROJECTED  ENFLESHKENT  ELLIPSOID  SURFACE  POINTS  -  XYZ. 
INDEX  ARRAY  TO  CEFINE  RELATIONSHIP  BETWEEN  POINTS  AND 
L 1 NKS . 

INDEX  ARRAY  TO  XYZ'S  TC  LOCATE  TANGENT  LINE  END0  C 1 N  TS . 
INTEGER  XYZK 

COMMON  /CEMEaY/  X  Y  Z  EN  { 3  •  1  CCO  )  ,  XYZ  K  C  1  C  CO  )  ♦  M 1  NT  AN  (  2  *  4  C  J  * 

1  M AXT  AN { 2 ,40 ) 

CGMMuN  //  CdMXYZ  //  MAN-MODEL  AND  WORKSPACE  XYZ  DATA 

man-mlDel  joint  a n l  Ellipse  centers  (neutral  and 

P*CJtCTEO) . 

WCRKSPAUc  PANLL  XYZ  DATA. 

KEY  TC  *XYZ  ARRAY  -  IDENTIFYING  EACH  POINT  MTh  A  PANEL. 
MAX  NUMBER  OF  XYZ'S,  WCR R S PA C E-XY Z  1  S ,  KEYS*  CONTROL 
POINTS  ALLCWEC. 

NUMB lR  OF  LINKS,  KEYS,  XYZ'S,  LINK-XYZ'S,  wCRKSPACE- 
XYZ'j,  CONTROLS,  AND  DIMENSIONS. 

K t Y Tm b  BUCKKEEPING  ARRAY. 

CONTROL  POINT  OATA. 

STATE  SWITCH  ARRAY  . 

INTEGER  wXYZKfCTLTYP*CTLPNLf  OTLPNTf  BLANK  St  CTL  NAM. 

COMMON  /OEMXrZ/  a Y L 0 ( 3 , 4 G , 2 J , X YZ ( 3 , 4 C J , w X Y Z ( 3 , 7 3 0 ) , W X YZK l 7 5 0 J  , 

1  MAXXYZ  tMAXWtMAXKEY ,MAXCTL tNLNKStMSGXI  (2 ) * IRSRV(2 ) , MSGX<  2 ) 

2  ISRVY(2),MSGY(2), IWKSP(2i ,MSoZ(2J, 1TASK(2) , 

3  KLYTAdlfci 250) ,CTLNAM( 2, ISO) , 

4  CTLTYPt 15J J  tCTLXYZ (5. 150 J tCTLPNL( 150  tCTLPNTi I50J  t 

5  dLANN^OJ  ,NKEY,  NXYZ,NCIM,NLXYZtNWXYZ,  NCTL  ,  ICSP,  INPT» 

6  I S W ( 72  J 

01  MFNS  ION  X  (  1  )  ,  Y  (  1  ) 

INTEGER  cLANf\,RItKlci>  I 

ECU  VALlNCE  { BLANK, FLANKS (1) ) 

IF  ( I S* ( 1 3 )  •  EC.  1  .A  NC.NKEY.GT.NL  NKS)  GO  TO  55 

PLOT  MAN-MODEL  LINKS  AND  ORE  *  STATION 


00001000 
00001  100 
00001200 
00001 300 
00001400 
00001 500 
00001 600 
00001700 
00001 800 
0 JO  C 1 900 
00002000 
OOOGc 100 
00002200 
00002300 
00002400 
00002500 
00002600 
00002700 
00002800 
00002900 
00003000 
00003  I  GO 
00003200 
00003300 
00003400 
00003500 
00003600 
00003700 
00003800 
00003900 
00004000 
0  00  04  1  Ou 
0  00  04  200 
0  00  0*3uD 
00004400 
00004500 
0  00  0*600 
00004700 
00004  800 
0  00  u4  900 
00005000 
00005  ICO 
00005200 
00005300 
00005400 
00005500 
,0  00  05  tOO 
00005700 
00005600 
00005900 
00006000 
00006100 
00u0o200 
00006300 
00006400 
0  00  Oc  500 
0  00  06  600 
000  Oo  700 
00006800 
00006900 
00007000 
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orn  o  n  onr  noo  nno  no 


J  =  1 A£S (KEYT A&<5, 1  )  ) 
HlER(J)  *  1 

CALL  PLOT (X(1)»Y(1)»3) 
DC  50  I-  2  *  N LNKS 
J  =  I  A  b  S { KE YT  A  £ ( 5» 1) ) 
K  =  KEYT A£< 1 , I) 

H  1 1  R  (  J )  =  1 


DISPLAY  ONLY  HEAD  AND  NECK  LINKS  IF  ISM3)*0  (  CFF  ) 


I  F  <  <  1$W<  2)  .EQ.O.  ANC.U  .LE.5.GR.  I.GE.ll)  )  .ANO.iSM  5J.EQ.C) 
♦  GC  TC  20 


LOCATE  COORDINATE  OF  PREVIGUS  POINT  IN  THE  CHAIN 

L  =  HIER  {  J-I  ) 

CALL  PL  CT (X ( L  )  ,Y ( L  )  ,  3 J 
10  H  =  2 


CHECK  IF  THE  LINE  IS  IN  OR  1 T  CR  INCLCDE  STATES 


IF  ( KEY  1 Ab 15  ,  I)  .L T .0. AND. KEYT AB (6, 1  )  .LT.O)  Rl  =  3 
CALL  PLOT  (X ( I  )«Y I  I )»M) 

2  C  J  -  lAGS(KEYTAo(6,  I)  J 
IF  <J.tC.  1)  GC  TO  50 


PLOT  ENFLESFEO  RAN-RCOEL 

JO  KP  =  KE YT ABU  ,  1  J +NLNKS-I 
L  1  =  KP  +  KEYT  AS (6 »  I  )-2 

35  DC  45  L  2- K  P  » LI 

CALL  SYR  SOL (X(L2J  — •04fY(L2)t •I75»lF.»0.0*lt • I75»  0 ) 
45  CONTINUE 

I F( MINT AN( 1 , I) .EC. U  GL  TC  5C 
LI  -  R1  NT  AN (  1  ,  1) +NLNKS 
L  2  -  Rl  N  T  AM  2  *  1)  +NLNKS 
CALL  PLOT  (X(L  I),Y  <U),3) 

CALL  FLCT(X(L2)»Y(L2)»2) 

L  I  =  RAXT  AN (  1  »  1  ) +NLNKS 
L  2  -  RAX  T  AN  I  2  i  I)  +NLNKS 
CALL  FLCT  (a(l1)»Y(L1)»3) 

CALL  FLCT  (XI L2 ) , Y { L2 )  , 2) 

5 C  CONTINUE 


P  L  CT  C  RF  k  STATION  PANELS 


55  CONTINUE 

IF  ( NLMsS. Eu.NKLY )  RETURN 
II  =  NLiMKS+1 
C 

DC  60  I  I  * NKEY 
K  =  KEr  TAcdtl  J  +  NXYZ+NLTmKS 
CALL  PLCl (X (K ) «Y (K ) »3) 

R  -  2 

IF  ( KEY  T AB ( 5 , I ) .LT .O.AND.KEY 1 AS( fct I )  .LT .0  )  M=3 
J  -  IAbS(KEYTAB(6t  I  )  ) 

L  =  K  +  l 
K  -  K  +J  -  I 
C 


00007100 
00007200 
00007300 
00007400 
00007500 
00007600 
00C07700 
00007600 
000  07  90u 
00008000 
ooooe  loo 
00006200 
0  00063C0 
OOGG84CU 
0000650C 
0000660U 
000087CC 
O0OO86CU 

ooooasuo 

00009000 
00009  100 
00009200 
00009300 
00009  4u0 
00009500 
00009600 
000  09 7 00 
00009  6u0 
OOC  09900 
00010000 
00010100 
0001020J 
000 1 0  3oO 
0J0104CU 
000 10500 
U  00 1 0600 
00010700 

ooo  luacu 

00010900 
00011000 
00011 100 
0001 1200 
00011 300 
00011400 
00011500 
00011600 
00011 700 
0C011 800 
00011 900 
00012000 
000 12 100 
000  12  2oO 
00012300 
000124u0 
00012  500 
000126UO 
00012  70U 
000  12ttOk> 
00012900 
00013000 
00013100 
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DC  6 C  J=L,K  00013200 

60  CALL  PLCT (X(J)>Y I  J  )  »  M  )  00013300 

C  00013400 

30  CCMINOE  00013500 

C  00013600 

RETURN  00013700 

ENC  00013600 
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APPENDIX  C-2 

COMBIMAN  SOURCE  -  CBMCP3  LISTING 


c 

c 

c 

c 

c 

c 

c 

c 

c 

c  * 

c 

c 


c 

c 

c 

c 

c 

c 

c 

c 

c 


c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 


c 


**<**************#*************** 

CdMCP3  -  *R1TES  COMBlMAN  0  AT  A  FOR  UFF-L  1  NE  PlCT  CN  LM  T  11 
CALLEC  EY  - 

CEMCFi  -  MAIN  CCMolMAN  PLCT  ROUTINE 

OUTPUT  TO  - 
UNIT  11 

********************************* 

S U ERGOT  1 Nc  C uMC P3 l DX , DY , SC LE , XZO  l , XZ 03, 1EC  ,  IP ER SP ) 

INTEGER  lCXtZQOC) 

RE AL  CX(  1  )  ,0Y (  1  ) 


COMMON  //  CEMdXY  //  M.AN-HGDEl  XYZ  DATA 

PRCJtCTEJ  ENFLESFMENT  ELL1PSCID  SURFACE  POINTS-  XYZ. 
INOEX  ARRAY  TO  CEF1NE  RELATIONSHIP  bETWEEN  POINTS  ANQ 
L  INKS  . 

INDEX  ArvrsAY  1C  XYZ'S  Tf  LOCATE  TANGENT  LINE  ENDPOINTS. 
INTEGER  X  Y  2  K 

COMMON  /CEMLXY/  X  Y  Z  EM  3  ,  1  C  CO  >  , XY  Z  K  t  1  U  CO  )  ,  M  1  NT  A  N  (  2 , 40  , 

1  MAXTAM2,<+0) 

COMMON  //  CtHVEW  //  MAN- MODEL  AND  kORKSPACE  DISPLAY  DATA 
RcLl,  PITCH*  AN  u  YAK  DATA. 

MAGNIF  ICAT  I  Cf,  LEVEL. 

XYZ  bISFLAY  OFFSETS. 

KANOt  OF  VALUES  IN  X,Y*Z  CIRECTICN. 

MAX  1 MUR  KANbt. 

MINIMUM  AND  MAXIMUM  X*Y,Z  VALLES. 

ONEGA  TkmNSFORMAT  ICN  HAT  R I  X . 

REAL  MAGLVL 

COMMON  /CcMvEk/  J-ULL*PI1CH*YAH,MAGLVL  , DOFF  X ,OCf F Y , OCFF Z , Ab , Yb , ZD , 

1  DU.XM, YM, ZM ,XC, YC , ZC, M$GV (  19  )  , OMEGA (3 ,3)  *NCFF , 

2  IOMEGA, OFFSET (3) 

CCMVUN  //  CEnXYZ  //  MAN-MCUEL  AND  WORKSPACE  XYZ  DATA 
MAN-MODEL  JOINT  ANC  ELLIPSE  CENTERS  (NEUTRAL  AND 
PROJECTED) . 

WORKSPACE  PANEL  XYZ  DATA. 

KEY  TC  WXYZ  A* RAY  -  IDENTIFYING  E AC F  POINT  WITH  A  PANEL. 
MAX  NOMDLK  OF  XYZ'S,  WORKSPACE—  XYZ  '  S  *  KEYS,  CONTROL 
POINTS  ALLOWED. 

NCMbE*  CF  LINKS,  KEYS,  XYZ'S,  LINK-XYZ*S,  *CRKSPACfc- 
XYZ'Sf  CCNThCLSr  AND  DIMENSIONS. 
nEYTAE  bOOKKEEPING  ARRAY. 
vICNTRCL  POINT  DATA. 

STATE  SWlTCF  ARRAY. 

INTEGER  wXYZK,CTLT VP, CTLPNLtCTLPNT, BLANKS,  CTLN AM 

COMMON  / CbMXt  Z/  X Y  ZC ( 3 , 4C , 2 ) . X YZ ( 3 , 4C  ) , K X Y Z (3 , 750 ) , WXYZK 1 75 0)  , 

1  MAX  XYZ  •  MAXk.MAXKFY  ,  MAXCT  L  ,  NLN  K$  ,  M.SGX1  (  2  )  •  1R$RV(2  )  ,MSGX( 2  ) 

2  I  SKV  Y  l  2  )  ,  MS  GY  l  2  ) ,  I  WKSP  (  2  )  ,  MS GZ  (  2  ) ,  I  Ta  SK  (  2  )  , 

3  KEYTaB(6»25C) ,CTLNAM( 2,  I5C)  , 

4  CTLTYP(150),CTLXY7  (5,  15G),CTLPNL(15C)  ,CTLPN11150)» 

5  ULANnS(3)  ,NKEY,  NXYZfNCIMItNLXYZtNhXYZf  NCTL,  1CSP,1  NPT, 

6  I SW (72) 


OOOUIOOO 
00001  100 
00001200 
00001 300 
000G140  0 
00001500 
00001600 
00001700 
0000180 0 
00001 90 J 
000020UJ 
00002 100 
0000220C 
00002 jOO 
00002400 
00002500 
0 0002  600 
00002700 
00002  800 
000029U  J 
0  00  03000 
0000310 0 
00003200 
00003300 
00003400 
00003500 
0  00  03  tOO 
00003700 
00003  600 
0O0U3900 
0  UO  04U0*> 
0000410 J 
00004200 
00004300 
000  04400 
0  00  04  500 
000  04  60 J 
00004700 
00004800 
000  04900 
0  0005  OCO 
000  05 1 CO 
00C052G0 
00005300 
00005400 
0  00  05  5Cw 
00005600 
00005700 
0000580b 
0UOU5900 
OOOObOOO 
00006 100 
00006200 
00006300 
,00006400 
0000o500 
00006600 
00006  70u 
00006800 
00006400 
0C0070U0 
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INTEGER  PVlEw 
IEC  =  0 

P  V  I E  W  =  OMEGA ( 1 , 2  ) +LMEGA ( 2  «3 ) +2 
TEMP  =  ABS(RCLL)+A8S(PITCH)+At$( YAn) 

IFtTEMP.NE.O.)  PV  I E  w=  4 
N  =  1 $W( 25) 

;  PL CT  NLM8ER 

MAXD  -  NX  Y2+N*XY2+NINK$ 

WRITE  (  11 » 1000)  M.AX0,NhXY2,NKEY,NLNKS,NXY2, SCL  E  *  X2D1 , X2D3 , N , I P ER SP 

DC  2C  I*1,MAXC 
1  CX  (  1  )  =  CX(  1 )  *  1  G  C  . 

2  C  CONTINUE 

WK  1U  (  11  ,  1C01  )  (I  OX  (  I  ),  1*1  , M AX  C ) 

DC  25  1=  1  ,MAxC 
I CX (  I  I  =  OY (  1  )  *100. 

25  CONTINUE 

WR  ITE  (  11  i  IC01  )  (  IDXCIlt  1*1  «MAXC) 

WRITE  (  11  »1C01)  (KCY1 Ao(  It  I  )  t  I»lt NKEY ) 

WRITE ( 11 , 1001)  (NEYTABI 5t 1  )  t I-ltKKEY ) 

WRITE  (11 i luOl )  ( KEYTA6 ( 6, I  )  »  1=1, NKEY) 

DC  50  1= 1 »  2 

wMTE  (  1  1 1  1002)  (  M  I  NT  AM  1  ,  J)  »J-1  ,NLNKS) 

WRI TE (1 1 , 1002 )  ( MAXTANM  I , 0)  ,  J  =  1 ♦ NLNK  S  ) 

5  C  CONTINUE 

WRITE  (11  t 10u3 )  IkSRV,  ISRVY  ,  I WKSP 
WRITE (11 » 1004)  PV I E  W  »  ROLL  » P l T  CF  »  Y  A* 

»R  IT  E  (  1 1  t  1005) 

RETURN 

FORMAT  STATEMENTS 

10  0  0  FORMAT ( I  4 , 2 1 0 , 1 2 ,  14»F4.2,2F7*2»2I2) 

1001  FCFNAT ( 1 c 1 5 ) 

1002  FORMAT (2014) 

1003  FORMAT ( 2 0 A4 ) 

1 J  0  4  FORMAT (I  2 .3F1G.2) 

1005  FGRMAT  ( 4F-v99 ) 

ENC 


00007100 
00007200 
000073C0 
00007400 
00007500 
00007600 
000077  00 
00007600 
00007900 
00008000 
00008  100 
00008200 
00008300 
00008400 
00008500 
OOC  Oti  600 
00006700 
00008800 
00008900 
00009000 
00009100 
00009200 
00009300 
00009400 
00009500 
000096U0 
00009700 
00009800 
00009900 
00010000 
0 OOIOIOO 
0001 0200 
00010300 
00010400 
00010500 
U00106U0 
00010700 
00010800 
00010900 
00011000 
00011100 
00011200 
00011300 
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APPENDIX  C-3 

COMBIMAN  SOURCE  -  CBMCP4  LISTING 


C3MCPA  -  PLCTS  HEAOINGS  ANC  DEFINES  BOUNDARIES  FOR 
PLOTS  OF  M  AN  MODEL  ANO  CREW  STATION  ON 
COULO  PLOTTER  I  I NTERMEC I  ATE  RCLT1NE) 

CALLED  BY  - 

CBKCP1  -  MAIN  CCNB  IRAN  PLL1  ROOT 1NE 


CALLS  - 

u6MCP2 

CLSCJT 

NLMBtR 

PLOT 

PLCTS 

SYMBOL 


PLCTS  .MAN-MGlEL  ANC  CREw  STATION  ON  GCULO 
FREE  BUFFER  (GCLLO) 

PL  C  T  NUMBER  (GGILC) 

GENERAL  PLOT  (GCULO) 

INITIALIZE  PLOTTER  (GCLLO) 

PLOT  SYMBOL  (GCLLO 


Output  to  - 

SYSPLLT  -  GCuLO  PLOTTER 


PARAMETERS  -  * 

0 X ( 3 000 )  ARRAY  OF  SCALED  X  CCCRCINATES 
D  Y ( 3000  )  ARRAY  OF  SCALED  Y  OOCRClNAlES 
SCLE  -  PLOT  SCALE  FACTOR 

IX  -  REAL  WORLD  CCCRO.  ALIGNEC  WITH  x  SCREEN  CGORD. 
IY  -  REAL  wCKLO  COCRC.  ALIGNEC  WITH  Y  SCREEN  COURL. 


*«t4**4********4***9************«* 


SUERCCTINF  CBMCP4(CX«0Y«SCLE.  IPERSP) 

0  I  ME  N  S ION  X  ZD ( 3 ) , OX ( 1 ) , C Y (  l) 

INTEGER  MSG( 3 ) »  WIEwI  5)  , MSG1 ( 5 ) ,  BLANK 


C 

C 

c 

c 

c 

c 


LCMMON  //  CBM6XY  //  MAN-MODEL  XYZ  DATA 

PRlJECTLJ  ENFLEShM tNT  ELLIPSOID  SURFACE  POINTS  -  XYZ. 
INDEX  A  Rrv  A  Y  TO  CEFINE  R  E  L  A  T  ILNShlP  BETWtEN  POINTS  AND 
L  INKo. 

INCEX  ARRAY  1C  XYZ*S  TL  LOCATE  TANGENT  LINE  ENDPOINTS. 

I  NTEGER  XY  ZK 

COMMON  /CEMBXY/  X Y Z EN ( 3 , l OCO )  , X Y Z M  1 OCC ) • M IN T AN ( 2 , A C )  , 

1  M A XT AN (2,40) 

CCMMuN  //  C  eM  V  E  Vs  //  MAN-MODEL  ANC  WORKSPACE  Cl  SPLAY  OATA 
RCLLt  PITCH,  ANO  YAW  CATA. 

MAGNIFICATION  LEVEL. 

XYZ  J I  SPLAY  OFFSETS. 

RANGE  OF  VALUES  IN  X,Y,Z  DIRECTION. 
maximum  RANGE. 

MINIMUM  ANC  MAXIMUM  X,Y,Z  VALUES. 

CM  EG A  J RANSPCRMAT ICN  MATRIX. 

KtAL  MAGLVL 

COMMON  /ClMVE*/  ROLL, PITCH  ,YAW, MAGLVL ,DCFF  X .OCFFYf CCFFZ , XU, YO ,Z0, 

1  JO,XM,YM, ZM,XC, YC , ZC,MSGV(  19 )  ,CMEGA (3,3) ,NCFF , 

2  ICMtGA, OFFSET (3) 


OLMMUN  //  ubMXYZ  //  MAN-M'OCEL  AND  WORKSPACE  XYZ  DATA 
MAN-MODEL  JOINT  ANC  ELLIPSE  CENTERS  (NEUTRAL  AND 
PkCJlCTLD)  . 

aCRrSPAOE  PANEL  XYZ  Data. 

KtY  TL  waYZ  ARRaY  -  ICENT  IFY1NG  EAlH  POINT  UTh  A  PANLL. 


00001000 
00001 100 
0  OuO 1 2  Ou 
00001300 
ODUOI 400 
0  00  01 5u0 
OOOClcCO 
00001 700 
0  00  01  BOO 
C0001900 
0  00  02  Ooc 
00002  1G0 
000  02  2u0 
00002300 
0  00  02  40 u 
0  00  02  500 
0  00  02  tOO 
00002700 
00002600 
000  C2900 
00003000 
00003  ICG 
00003200 
000033 00 
0  00  C  3  400 
0J0uj>500 
0  00  03  tOO 
00003  7uO 
000038 00 
00003900 
00004000 
0000^  100 
00004200 
000  04  300 
00004400 
00004500 
0  00  04cO0 
00004700 
0  00  04  Sou 
00004900 
0  00  0  5  00  J 
00005100 
0  OG  05  20  J 
00005300 
00005400 
0 0005  500 
OUU  05 tOO 
000  05  700 
0 00  05  BOu 
00005900 
0  00 06  GOO 
OOOOo 1 GO 
00006200 
000C630O 
0  OG  Oo  4C0 
0  00  uo 500 
U  00  06  6U0 
000  Oo  7 00 
00006800 
000  06900 
00007000 
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MX  NUMBER  CF  XYZ*S,  WORKS  PAC  E-  X  YZ  *  S  ,  KEYS,  CONTROL 
POINTS  ALLOWED. 

NUMBER  CF  LINKS,  KEYS,  XYZ'S,  LINK-XYZ'S,  WtRKSPACE- 
XYZ'S,  CONTROLS,  AND  CIMENS1GNS- 
KEYTAe  BOOKKEEPING  ARRAY, 

CCMRCL  PC1NT  DATA. 

STATE  SWITCH  ARRAY. 

INTEGER  *XYZK,CTITYP,CTLPM-,CTIPNT,BLANKS,CTLNAM 

COMMON  /CfcMXYZ/  XYZC< 3, 40 , 2) , XYZ ( 3,40 > , wXYZ(3 , 750) , WXYZK ( 750)  , 

1  MAXXY  Z  ,  MAXW  ,MAXKtY  ,  MAXCT L , NL NKS ♦ MS G*1  (  2  >  ,  IRSRVt  2  )  ,MSGX  t  2  ) 

2  I  SR  VY<  2),MSGY(2),  UK  SP(2)  ,MSGZ(  2)  ,  ITASM2)  , 

3  KE  YTAEt  6,  2  50  ,CTCNAM<  2,150, 

A  CTLTYPt 150) ,CTLXYZ (5, 15G) ,CTLPNL(15C) ,CTlPNT(150) , 

5  BLANKS (3) , NKEY,NXYZ,NC1M,NLXYZ,NWXYZ,NCTL,1 CSP,I  NPT, 

6  I  S  *  ( 7  2) 

EOtl VALENCE  ( X  ZD ( 1 ) ,XC) 

EQUIVALENCE  ( fcL ANK , ELANKS ( 1 ) ) 


1  C  FF  ♦, •AXIS'/ 
,  4h  Y A  W  / 


DATA  l Vi t*/'XY  '  ,  '  X 1  ,  1  YZ 
DATA  PSG/AhVlE  w  , *tH-P L  A ,  4HN  E  :  / 

DATA  NSG I /4HRGLL, AH  P,AhlTCh,Ah 
NCh  =  A 

NUMBER  CF  CHARACTERS  TO  BE  DISPLAYED 
PvIEw  =  uMEGAt  I  ,2  )+CMcGA(2,3>+2 
TEMP  =  ABS(kuLU  ♦  ABS(PITCH)  ♦  ABS(YAw) 

IF (TEMP.NE.O)  PVI E  W-4 
I F (PV  I  U . EC. A)  NC H=  8 

PLC 1  TITLE 

uALL  PLOT  S ( 5 . , 1C.  ) 

C  SIZE  OF  PLCT 

CALL  SYMBOL (  1.,  I  .  7 5 , .2 5,  MSGXi ( 1) , 9C.  •  16, .25,0) 

C  REGRESSION  MEMBER 

CALL  SYMbCL  U. 5, 1.75, .25, MSG  X(l),  90. ,16  ,.25,0) 

C  SURVEY  MEMBER 

CALL  $YM6CL(2.0,Z.,.25,P3CY(1),9C.,1o,.25,C) 

C  CREW  5 T AT  ICN  MEMBER 

CALL  SYMBOL ( 2.5,1 . , .2 5, MSG ( 1 ) ,50. , 12, .25,0) 

C  VIEW  PLANE: 

CALL  SYMriCLI  9  5  9.,  999.  ,.25,  IVl  LWtPVlE*  ),90.  ,NCH  ,.25,  C) 

C  VIEW  XY,  XZ,  YZ  CR  CFF  AXIS 

CALL  S  Y  X  6  C  L  (  3  •  C  ,  1  .5,. 25,  M  SGI  (  1  ),  9  C  . ,  2  C ,  .25,0 
C  ROLL,  PITCH,  ANC  YA  * 

CALL  NUMBER (3. 5, 2. 25,. 25, RCLL, 50.  ,1,2) 

C  ROLL  ANGLE  IN  DEGREES 

CALL  NCM0ER  <3 .5,4.2  5, .2  5  , P lTCh,9C.,  1  ,  2) 

C  PJTCn  ANGLE  IN  DEGREES 

CALL  NUMBER! 3.5.0. 5, .25, YAW, 9C.,  1,2) 

C  YA*  ANGLE  IN  DEGREES 

IF  (  I PtRSP .Ew . 1 )  CALL  SYMBCL(4.t  1.75,  .25,1  5h NGN—  PERSPECTIVE, 

*  SO., 15) 

IF  (IFERSP.EU.2)  CALL  SYMBCL (A. ,2. 25, .25,1  lhPERSPEC  TI VE, 

*  SO. ,  1 1  ) 

CALL  SYMBOL U  .5 ,2 . 2  5  ,  .2  5, cFSC ALE=  ,S0  .  ,6  ) 

LALL  NUMBER (999., 7  99.* .25, SOLE, 90. ,2) 

C  SCALE 

CALL  FLGT (C.,0.,999) 

C  TERMINATE  TITLE  PLOT 

CALL  FLU  T  S  ( “O  0  •  ,-60.) 


00007100 
00007200 
00007300 
000  07  400 
00007500 
00007600 
00007700 
00007800 
0  OG  07900 
, 0  00  08  Ouu 
00008100 
00006200 
00008300 
00006400 
00008500 
0  00  06  6uO 
00005700 
00006800 
0  00  08 SOO 
00009000 
0  CO  09 100 
00009200 
00009300 
0  00  09 AGO 
00009 50u 
00009600 
00009700 
00009800 
000099 00 
000 10000 
000 10 10U 
00010200 
000103C0 
OuO 10 AGO 
000 10500 
00010  6Co 
OOC  10700 
00010800 
OOG 1 0900 
00011000 
00011100 
OOOIUOO 
00011 30u 
0  GO  1 1 AOO 
00011 500 
00011600 
00011 700 
0001 1 600 
00011900 
0  GO  12  000 
00012 100 
000  12200 
00012300 
0 00 12  AOO 
00012500 
00012600 
000 12700 
00012800 
00012900 
000 13  COO 
0  00 1 3 1  CO 
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c 

START  CGMbIMAN  PLCT 

00013200 

CALL 

C8MCF2(UX(  n  f  DY (  ; 

L)  ) 

00013300 

c 

CALL 

PLOT (C. ,0. ,999 ) 

PLCT  RAN-PCDEL  AN  C  CRtk  STATION 

00013400 

00013300 

c 

CALL 

CLSCLT 

TERMINATE  CCMd  IRAN  PLG1 

0001360U 

00013700 

c 

KETJk 

N 

CLLSE  PILE  AND  FREE  CORE 

000 13800 
00013900 

END 

00014000 
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APPENDIX  C-4 

COMBIMAN  SOURCE  -  CBMVSI  LISTING 


c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 
c 

c 

COPY 


*************  *********  ***** 

C6MVS1  —  GENERATES  VISIBILITY  PLOTS  CM  GOULD  PLOTTER 

called  by  - 

CSMVIS  -  CGMblMAN  VISIBILITY  ROUTINE 
CALLS  - 


Aes  -  ABSULUTE  VALUE  OF  REAL  VARlAbLE 
cLSCuT  -  CLOSE  GOULD  PLOTTER 
IABS  -  ABSULUTE  VALUE  CE  INTEGER  VARIABLE 
I f I X  -  CONVERT  REAL  VARIABLE  TO  INItGER 
iMlN  -  MINIMUM  VALUE  AMONG  INTEGERS 
NUMBER  -  GGULO  NUMBER  PLOT  ROUTINE 
PLOT  -  vjGUL  C  LINE*  POINT  PLOT  ROUTINE 
PLOTS  -  GCULD  I.MTI  ALIZATION  ROUTINE 
olGU  -  SIGN  OF  REAL  VARIABLE 
SORT  -  SQUARE  ROOT  GF  vARIAcLE 
SYMBOL  -  GOULD  CHARACTER  PLOT  ROUTINE 

OUTPUT  TO  - 

GCULD  -  PLOTTER 

P  A  R  AM  fc  I  fc  R  - 

IPLOT  =  I  —  INITIALIZE  GOULD  PLOTTER 
-  9  S  5  S  —  TERMINATE  PLOTTER 
=  ANY  OTHER  VALUE  —  PLOT  POINTS 

REMARKS  - 

IN  ORDER  TO  GENERATE  VISIBILITY  PLOT  L  S I  NO 
AN  ON-LINE  PLOTTER  ALL  GCULD  PLOTTER  ROUTINES 
SHOULD  BE  CHANGED. 

************************  ***** 
SUBROUTINE  CcM V  SI (  I  PLLT ) 
t  S  lEMPOT 

COMMON  it  CBMPDT  //  OUTPUT  HEAOING  DATA 

PAGE,  LINE  NUMBER,  DATE  AND  TIME  DATA. 

clMMJN  /  LEW  Put/  IPAGE  * L INE  * IMuNTH ,  IDaY»  IyEAP,  I  FoUP  ,  1MI  N,  1  SEC 

DP Y  ,S  C  EMvSB 

OuMM^ n  //  CBMYSB  //  HORIZONTAL  A NO  VERTICAL  VISION 
ANGLES,  NaME  OF  MEMBER,  HORIZONTAL  AND  VERTICAL 
MNoLtiS  OF  CREWMEMBERS  HEAD,  ThtlK  SlGi\  SWITCHES, 
NUMBER  OF  POINTS,  AND  EYE  COORDINATES 

COMMON  / CLPVSB/  AL PH ( 2500  )  ,  BE T A ( 2  SCO >  ,  I  NAM E (2  )  *  HANG  ♦ 

1  IHA,IHS,IVA,IVS  ,  VANG,  NPfJTS,  XL  EYE  ,YLEYE,ZLEYE 


♦  *0 

0 

0 

0 

0 

0 

c 

0 

C 

0 

c 

0 

0 

0 

0 

0 

0 

c 

0 

0 

0 

0 

0 

0 

0 

0 

c 

0 

0 

0 

0 

0 

*  *0 


0 


0 


DIMENSION  lHT(J,3)*IVT(Z,2)tlHL(J),lVL(3)fAB( 3*4) * IE|_IP3(4} 

DATA  IFT/4F»\iGH?4HT  LPf^H  f<ihFPoM»4h  ,  4  H  , 

1  'thLtFT»4H  L.P  ,**H  /, 

2  IvT/AHBtL0,4hw  , shF  ROM  *  RH  ,4HAdCV,4HE  /, 

3  I  EL  I FS/InMflhP, IHF*1HS/*  IHL/9, 5,o/ ,  iVL/fc, 6,fc/* 

*t  AG/  Ifc5.»6o.,-o2.  ,  9  3  .  ,  fco  •  *  —  B2.*74.»48.  *”c6.*56.*48.»'“fco./ 


00000IUG 
00000200 
00000300 
000  00  4oO 
OcO  00  500 
000U06UU 
D0O00700 
OuOCOBGO 
00000900 
00001000 
00001  10 SJ 
00001 200 
0  oG  01 30G 
0  00  01 4GG 
O0UO15CO 
OOOOlcOO 
000017GG 
00001  BOO 
000  0 1 90u 
0  00  02  QuO 
00002100 
0U002200 
0GOU25O0 
00002400 
000  02  500 
COO  02  600 
00002700 
0  00  02  BOO 
00C0290C 
0  00  03  OuO 
00003100 
0  00  03  20u 
00003300 
00003400 
00003600 
0  00  03  oGG 
00003700 
00003800 
000035CD 
0  00  u4  0  00 
0  00  G4 1 00 
0  00  04  2U0 
00004300 
000 04 4 Go 
000045UU 
0  00  04 ouu 
00UC47G0 
0  00  04  BOO 
00004900 
OU005000 
00005100 
00005200 
G0005300 
00005400 
0  00 0 5  5o0 
000C5600 
000  05  7 uO 
0  00  05  BUG 
0  00G590U 
0  Oo  Oc  OoO 
OOOOfclOO 
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C 


IF  (  lFL0T.Et.999V  )  GC  TC  SCO 

CLOSE  PLOTTER  ANC  TERMINATE  PLOTTING 
IF  (I  PLOT .NE. 1)  GO  TO  200 

PLCT  POINTS  ALONG  CONTOUR 


DEFINE  SIZE  CF  PLOT  TO  BE  19X1C 


CALL  PLOTS (  19 . ♦  10 . ) 

uRflh  LEFT  MARGIN 


C 


-c 


CALL  PLUT ( .05,0.*  3  ) 

CALL  PLOT  I  .Ob,  10. ,2,3) 

CALL  PLOT  (1.  ,0.  ,-3) 

PRINT  HORIZONTAL  f>  VERTICAL  HEADINGS 

CALL  SYMUCL ( . 2  *  2 . 8 , . 3 , 1 6HV ER T  1  CAL  uEoREE S , 9C.  ,  16) 
lALL  SYMttCt ( .3 ,3.3t .2 , IoHFROM  LI NE-LiF- SIGHT  ,9C.  ,  1 8) 

Call  SYMbCL ( 3  .25*  . 5  * . 3 , 37hhOK IZONTAl  DEGREES  FROM  L lNE-OF— SIGHT , 
1  u . *  37  ) 


OUTLINE  AREA  CF  PLCT 

CALL  PlOT  (1.2, 1.5,3) 

CALL  PLOT (  1.2, 8.6, 2,-1) 

CALL  PLOT  (  15.6, 8. 8, 2,-1 ) 

CALL  PlOT  (15.6, 1.6, 2,-1  ) 

Call  plot  (  i.i,  1.6, 2,-n 


uRftA  V  t  R 1  IuAL  GR  1U 


C 

c 


0000620U 
00006300 
000  Ob  400 
000  Oo  500 
OOOObfaOO 
00006700 
OUU 06800 
000  06  90 J 
000 J70GG 
0uC07 ICO 
Ouu  07  200 
00007  30u 
OOOC7aOu 
00007  500 
0  00  07  oO^ 
00007700 
00007800 
OOo  07  9Qu 
0  00  OB  000 
OOOOtilGO 
000  08  200 
0000o3uu 
00008400 
00008300 
000  Oo  6u  J 
0 00 Oo  7 00 
0  0008  BOu 
OOo  08  900 
0  0009 OuQ 
00OU9  luO 

0  00  0*7  200 

C  00  09  300 


XC  =  15.6 

A  =  1.1 
YC  =  1.6 

DC  IOC  1=1,17  ,2 
YC  -  .4 

CALL  PLOT  (A, VC, 3) 

CALL  PLCT  UC,YC,2, 1) 

IP  (  I  .tw.  17)  GC  TC  100 
IF  (  I. EG. 15)  XC= 13.6 
IF  (  1  .tw.  13)  A  =  6.2 
YC  =  YC+.4 
CALL  PLCT ( AL, YC, 3 ) 

CALL  PLCT  (  A  ,  Y  C  ,  2  ) 

1  JO  CONT I NUE 

URaa  HLRIZuNTAL  GRID 

AC  =  1.2 
Y 0  *  7.6 
DC  1  10  1  =  1,35,2 
XC  =  XC  +  .4 
IF  (1.60.5)  YC=  3  •  3 
CALL  PLOT  (Xu, 1.5, 3  ) 

CALL  FLC1  (XC,YC, 2, 1 ) 

IF  Cl • E  w  .  3  5 )  GC  TC  1 10 
XC  =  XC+.4 
IF  (  I  .t *.31)  Y  C=  7  •  c 
CALL  PLCT ( XC , Yu , 3) 

CALL  PLCT (XC,  1  .5, 2  ) 


0  00  09  4oO 
0  00 OS  500 
00009600 
00009  700 
00009600 
000  09  900 
OOOlOOOu 
00010100 
00010200 
0  00 1 0300 
0  00  1 0  h  Ou 
00010500 
00010600 
000 10  700 
uOOlOdOG 
00010900 
00011000 
00011 100 
00011200 
000113CJ 
0001 1400 
00J1I 500 
0 Ju 1 1 uOu 
00011 700 
CJ011G0O 
J  Ju 1 1 900 
0  00  12  000 
00012 10J 
00012200 
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110  CONTINUE 


PUT  LEGENDS  ON  THE  PLOT 


C 


A  =  . C75 
A  1  -  13. 8 

CALL  SYMBCLt 13.75,8.6,.  1,13HV1$ICN  L 1  Ml TS t 0* ,  13) 

CALL  SYMoCL(h1»6.25,A»23HS  —  STEREu  ,C.,23) 

CALL  SYMdCL ( Al , u. 1 1 « A ,23HF  —  FIXATION  ,C.,23I 

CALL  SY-laCL  (Al,  7.93,a,23HP  -  PERIPHERAL  ,C.,23I 

CaLL  SYM&CL  (  a  1 , 7. 7  5 ,  A  ,23Hf*  —  NAX1NUM  PERIPHERAL  ,C.  ,23) 

CALL  SYMBOL (  1 .5,6 .6, . 1, 12hEYE  LGC A T 1  ON, 0 . , 1 2) 

CALL  S YM  at  L  (  1  . 7  5 »  8 . 45  » •  C75 , 4 h X  =  ,C.,4) 

CALL  NUMbER*  c  .u5,  8.45,.C75,XLEYE,C.,2) 

CALL  S  YM  d  C  L  (  1.75,  o.  30,.  C  7  5 , 4  H  Y  —  f  G .  ,  A  ) 

LA  LL  NUMBER! 2.05,  6.30, .075, YLEYE ,C.,  2 ) 

CALL  SYMBOL ( i .75, 8. 15, . G75 ,4HZ  =  , C. , 4) 

CALL  NUMBER  ( <-.05,6.15,.G75,ZlEYE,C.,2) 

CALL  SYMbCL*  1.3,7 .95,  .085,  13HCREw  ST  A T I CN : , C.  f 13 ) 

CALL  SYMBOL (2.405, 7.55, .085, i  NAME  (1)  ,  C.  ,  4) 

Call  symbol ( 2.745,7  .S£, .0  85, I  NAME (2) ,  C. ,4) 

CALL  SYMbCU 1 .675, 7. 75, .075,5EDATE: ,0.*5) 

CALL  NUMBER! 999., 999. , .075, lMCNTh, C. »-l ) 

CALL  SYMBOL (999.,995.,.u75,lh/,u.tl) 

LALL  NUMdER(959.,955.,.075,IUAY  ,0. ,-l  ) 

C^  LL  SvMtiCL (9  99.,  99  9. ,.0  7 5,1 H/,0. , 1) 

CA  LL  NUMBER ( 954. , 999.,.075,1YEAR  ,0.,-li 


LAbcL  VEkTICAL  AXIS 


YC  =  1.5 
1Y  =  50 

DC  130  1  =  1,7 
X  C  *  .6  5 

1 YP  »  1 AES( i Y ) 

IF  (  I YP .LT.  10)  X C=  XC  +  . S 5 
CALL  Nu  McER  (  XL  ,  Yu  ,  .15,  iYP,0.,**l) 
CALL  SYh. 8CLIS95.  ,495.,  .15,46,0.  ,-l) 
CALL  SYMBOL (559. ,955.,0., lhO,C.,l) 
YC  =  YC  n  .2 

IF  (YC.uT.8.7i  GJ  TL  140 
1Y  =  IY-30 
130  CUM  1  NcE 


-C 


C 


L 


LAdEL  HORIZONTAL  AXIS 

1  AO  C C  NT 1NUE 
XC  =  1.3 
J  *  2  1C 
DC  1 5  C  1=1,13 
YC  =  .9 
J  =  J-30 

L  =  1  Ad  S ( J) 

IF  (L.LT.100)  YC=YC+.15 

IF  (L.LT.10)  YC=YC4.15 

CALL  NUMEER(XC,YC,.15,l,5C.,-1) 

CALL  SYMBOL (959. ,959., . 1 5 , 4c , 50 . ,-l ) 
CALL  SYMcCL(994.  ,«/59.,0.  ,  IHC,90.,  1) 
XC  =  xC+  1  .2 
1 5 C  CONTINUE 


00012300 
00012400 
00012  500 
00012600 
00012  700 
0  00 12  800 
00012900 
0  CO 1 3  000 
00013100 
000 Ib  200 
000133C0 
00013400 
OOo 13  5C0 
OOO  1 3  6l»Q 
0  00 13  700 
00013800 
000 13500 

uooncoo 

00014100 
o  uC 14  200 
0  00 14  300 
0  Oo 14  400 
0  Oo  14  500 
0  00 14o00 
OOo  I47o0 
000  1 4  80 J 
0  CO  14  9u0 
00015000 
00015100 
OOO i 5^o0 
000 15300 
OOO  15400 
OOO 15500 
00015o oO 
00015700 
00013800 
00015500 
OOO 16000 
0001 6 luu 
00016200 
0  00 1 63  00 
0  oO 1 6  400 
0 00 lo  500 
00016600 
OOU 16  700 
000  16  80u 
000165O0 
UO017000 
00017100 
0  00 1 7  200 
00017300 
OOO 17400 
0  00  17  500 
0  0017  coo 
OOO 17700 
OOO 17800 
00017900 
GuC 18000 
00018  LOU 
00018200 
00016300 
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PRINT 

ORIENTATION  OF  TFE  CRbWMKMdtR 

•$  HEAD 

c 

000  16400 
000 13  50o 
n  nil  l  m  An  a 

I  hA 

=  PANL+SIGN( .5, HANG) 

\J  \J\J  X  O  OVJ  J 

00013700 

HORIZONTAL  angle 

OOOldoOO 

1  H  S 

=  1 

00016900 

SWITCH 

TC  INDICATE 

SIGN  CF 

I  HA 

0  00 1 9  000 

1  FOR 

NEGATIVE,  2 

FCk  zer c, 

AND 

OOo 19  100 

3  FOR 

POS  IT  1 VE 

0  OC 1 92  OC 

IF 

l  1  FA 

.Cl  . 

u  •  0 )  I FS  =  3 

0 00193CJ 

1  r 

l  IF  A 

•  tC  • 

0.0)  I F  S=  2 

000194O0 

IF 

(  I  FA 

.LT  . 

O.C)  IFA=-IHA 

0  DO  1  9  5Gg 

I  vA 

=■  VA 

NC  +  S I  ON ( . 5 , V ANG ) 

00019600 

VERTICAL  ANGLE 

000197G0 

1  VS 

=  1 

000  l98uu 

Srv  ITCF 

TC  INCICATE 

SI CN  CF 

I  VA 

000199G 0 

1  F 

(  I  VA 

.GT. 

u.C)  I VS=3 

0  CO  2  0  G G  O 

IF 

(  I  VA 

.  EC. 

G.C)  I VS=  2 

00020  luO 

I  F 

(  I  VA 

.LT. 

O.C)  I V  A=— I V  A 

0  002u2G0 

4 

RESET 

VERTICAL  ANG 

LE 

C  00  20  300 

I  I  L  =  5d ♦  IrL  (  Ir S) ♦  I  VL  (  1  VS  ) 

IF  (1KA.LT.I0)  ITLM1L-1 
IF  (IVA.lT.1J)  ITL=ITL-1 
T  S  F  =  (15.-(1TL*.2>  ) / 2 . ^ . 6 

CALL  SYSfaCU TSPt9 . , .2, 30F.CRthKEMfcERS  Ft A C  IS  PUNTING 
CALL  NUMb6R(999.,999. ,  •  2 ,  1  HA, C • , -  1 ) 

CALL  SYMdLL(999.,9.  12 , . 1 2 , 2FC  ,0..2j 

CALL  SYR3CL (999.,9. , .2, IHT ( 1, IhS ) , 0. , IHL ( IH$) ) 

CALL  SYMbCL(949.,999. , .2, 12FFCRwAR0  AND  ,C.,12> 

CALL  NUNltsER  ( 9S9. , 999.,  .2, IVA,C. ,-l ) 

CALL  SYr*bCL  (999  .,  9 . 12  ,  .  12 , 2HC  ,0.,2) 

CALL  SYMiCLt  9  99.,  9. ,  .  2,  I  VT  ( 1  ,  1  V$ ) , 0. ,  1  VL (  I  VS)  > 

CALL  SYhdCl (999. , 99< .,.2,1 CF.HCRi 2  C  N  T  A  L  , C.  ,  10  ) 

CALL  HOT  (1.2,1  *0,-3) 

CALL  SYHfaCL  (7.2  ,3  .o  ,.  li>,  1  ,  C.  ,-l ) 


»  C  •  «  3 G  ) 


0  00  20  4uu 

00020500 
0OG2O6C0 
0002070O 
00020600 
0  0o2  0  900 
00021000 
00021 lOu 
0  00  2 1 2  CO 
00021300 
000  2  I  900 
00021 500 
00o2 1600 
U0021 700 
00021 600 
00G2190U 
000*^  GOu 


GENERATE  VISION  limit  ellipses 
SSS...  FuR  STEKlC, 

FFF  .  .  .  FOR  FIXATION, 

PPP...  FuF:  PEKIFERAL,  AND 

FOR  PAXIMLM  PEk  l FERAL  VISIONS 

OC  1 7  C  1  =  1,9 
A  »  A  6  (  I  ,  I  ) 

XI  *  —A 

LIM  =  I  F  I  X  (  A  )  ♦  1 

DC  lfcC  J  =  1  »  L  1  M 
SOI  =  SwRT( 1.-(aI/A)**2) 
ai  =  A  6  (  ? , I  >*SQ1 
A 2  =  A6 t  3, 1 )*S0 1 
Xll  =  1X1+130. 

Yll  =  ( A  1  +  9C.  )* .09 
Y21  *  (A2+9u.)*.04 

CAL  L  S YFOuL (Xll, Yll, .06 75,  I  EL  I P S ( 1  )  •  C  .  ,  1  ,  .  1  , 1 > 
CALL  SYFbGL (Xll ,Y21  , .0875,  1ELIPS( I  )  ,0. , 1  ,  .1  , 1 ) 
XI  =  X  I +2. 

1  6  C  CONTINUE 

170  C  G  NT  INGE 


0 Gu  22  IGo 
00022  200 
C 00 22  300 
00022 AGu 
00022500 
0  0022 600 
00022700 
000228UG 
0  00  22  9o0 
OGG23GOJ 
0  Oc  23  1  oO 
00u»23200 
Ouu  23300 
0002340U 
00023500 
00023600 
0  00  23  700 
G  00  23  600 
00O239OO 
0  00  2 aOoO 
0  0029 IGO 
00G2920U 
000243GO 
0  002  4400 
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PL CT  PulNTS  ALONG  CONTOUR 

THE  POINTS  ARE  PLOTTED  IN  THE  REGION  OEFlNEC  BY  > - X 


0 


I 
I 
X 
I 
I 
I 
1 
I 

(0,0) 


1 

I 

<  2,5.925) 


( 12.3, 1*125) 


I 

I 

- X 

I 

I 

I 

I 

I 

- X 


(C,  14.3) 


200  CONTINUE 
I  PEN  *  3 

Dl  23C  1*L«NPNTS 
XL  =  AL  PM  I  )*  .04 
YC  =  EE T  A  ( i  l  +  .u 4 
IF  (  I  .t C.  I  )  CO  TC  210 
A  =  AES ( AL  Pm ( i )-*LPh< I- 1 )  ) 
A  I  =  (ALPH(  I  i  +  AL  PM  I  —  11  )/2 
A  2  =  ( o  t  T  A (  I  )  +fctTA ( I-I ) i/2 
(A.uE.35.)  1 P  E  N=  3 


I  F 
IF 


( Al. LT.  1. 
A2. LT. L. 


.CK.  Al.oT.359. 
.OR.  A2.GT.  179 


.UR  . 

i  I PEN=  3 

SEGMENTS  C  I  S  T  OK  T  El)  cEYCNJ  REASON 
ARE  NOT  PLOTTED 


2  10 


CCNT  INUE 
1  PND  FY  =  0 


IF 


IF 


SET  bCLNCAKY  SWITCH  TO  C 
l4.3.Ur\.YC.LT  .C..CR.Y0.GT.7.  125) 


( XC.LT.O. .UR.XC.LT. 

I  END  K  Y=  1 

(  (XL.LT  .2.G.DR.XC.G1 .  12.3). ANC.YC.CT. 5.925) 

I  END R Y  =  1 

CALL  PLCT(XC,YC, IPEN) 

PLCT  POINTS  WITHIN  BOUNDARY  ONLY 


I  F  (  IBNCFY.EC.O) 


I  FEN  =  2 

IF  (I  BN  CRY. EC. 1) 
230  CONTINUE 
RETURN 


I  P EN'=  3 


END  PLOTTER  ROUTINES 


300  CCNT INuE 

CALL  FLO  T  (  C  •  »  C  •  M  9 9  ) 

CALL  CLSOuT 

RETJRN 

END 


00024500 
000  24o0 J 
00024700 
0  00  2^  800 
00024900 
0  00  25  OOu 
00C25 lou 
00025200 
0  00^5  3U0 
00025400 
00025500 
0U025  60u 
03025700 
U00256G0 
0002590 J 
0  00  2t>  GGu 
00026  IUU 
00C2620U 
00026300 
0  0c2o AOO 
000265U 0 
00026600 
U  0026  7uO 
0  002  c  800 
00026900 
0UU270O0 
0  Ou27 100 
000^7  20u 
0 00  27  30 c 
000274UU 
00027500 
00027600 
000277CJ 
00027800 
0002790c 
0  0028  GoO 
0  OC  2d  100 
00023200 
00028300 
0  0028  400 
0002  8  5uu 
00026600 
00u26  700 
0uc28  buu 
00023900 
0  0029000 
0  00  29  100 
000292G0 
00029 3uO 
00029400 
0  00  29  50 J 
00029  cOO 


300 


ooooooooooooooooooo  oooooooooooooooooooooooo 


APPENDIX  C-5 

COMBIMAN  SOURCE  -  CBMOFF  LISTING 


C8M0FF-  TAKES  OATA  OFF  OF  TAPE  TO  BE  USED  TO  PLOT  COMBIMAN-- OFFLINE 


CALLS  - 

PLOTS  -  CALCOMP  ROUTINE  (PLOT  INITIALIZATION) 

PLOT  -  CALCOMP  ROUTINE  (ORAM  LINE  OR  POSITION  THE  PEN) 

NEWPEN  -  CALCOMP  ROUTINE  (CHANGE  THE  PEN  COLOR) 

FACTR  -  CALCOMP  ROUTINE  (RESET  PLOT  SCALE  FACTOR) 

SYMBOL  -  CALCOMP  ROUTINE  (ORAM  A  SYMBOL,  CHARACTER,  OR  A 

CHARACTER  STRING) 

NUM8ER  -  CALCOMP  ROUTINE  (ORAM  A  NUMBER) 

C8NCP0  -  PLOT  THE  MAN  MODEL  ANO  CREM  STATION 
PLOTE  -  CALCOMP  ROUTINE  (CLOSE  THE  PLOT  FILE) 

INPUT  FROM  - 

UNIT  5  -  CARO  INPUT 

UNIT  8  -  PLOT  OATA  ON  OISK  OR  MAGNETIC  TAPE  OR  CAROS 

OUTPUT  TO  - 

UNIT  6  -  PRINTER 
UNIT  7  -  PLOT  TAPE 


REAL  OX (2C00) ,OY (2080) 

COMMON/OUNMY/  MSGX1 (2) , IRSRV ( 2) , MSGX ( 2) , ISRVY (2) ,MSGY(2) ,IMKSP(2) 
DIMENSION  IPLOT (23) ,CATA(1024) 

C0MM0N/C8MXYZ/  KEYTA8 ( 3 , 250) , NLNKS, MINTAN(2, L0) ,MAXTAN(2,A9)  , 

1  NKEY  »NXYZ> ICOLOR( A) .FLESH , FACTR, SCLE 

**  THE  INPUT  STREAM  CONSISTS  OF 

1.  THE  NAMELIST  “CNTRL",  EVEN  IF  IT'S  EMPTY 

2fc  A  CARO  MITH  THE  NUMBERS  OF  THE  PLOTS  NOT  MANTEO 

ALSOJTHE  PLOT  OATA  FILE  SHOULO  BE  ATTACHEO  TO  THE  PROGRAM  AS 
UNIT  8. 

THE  NAMELIST  VARIABLES  ANO  THEIR  OEFAULT  VALUES 

1... FACTR-  SCALE  FACTOR  FOR  PLOT  (OEFAULT*THAT  SPECIFIED  DURING 
C8M05  RUN) 

2. ..LINKS-  C,  IF  LINK  SYSTEM  IS  TO  BE  PLOTTED?  1,  IF  NOT  (OEF*0> 

3...  FLESH-  <1,  IF  ENFLESHMENT  ELIPSOIOS  ARE  TO  BE  PLOTTED?  1,  IF 
NOT  (0EF*0) 

A...CRST-  5,  IF  CREM  STATION  IS  TO  BE  PLOTTED?  1,  IF  NOT  (0EF»0) 

5... (ICOLOR(I) ,  1*1, A)-  PEN  COLORS  FOR  BANNER,  LINK  SYSTEM, 
ENFLESHMENT  ELIPSOIOS,  ANO  CREM  STATION  RESPECTIVELY 
(0EF*1,  1,  2,  3) 

DIMENSION  MSG1 (3 ) , MSG2 (3) ,MSG3 (3),MSGA(3), MSG5( 6) ,IVIEM(5) 

INTEGER  FLESH, CRST.PVIEM 

NAMELIST  /CNTRL/  FACTR, LINKS , FLESH, CRST .ICOLOR 
OATA  FACTR .LINKS .FLESH , CRST/99. ,3*0/ 

OATA  ENO/AH— 999/, IPCNT/0/ 

OATA  MSG1/AH  .AHREGR , AHESS  ?/ ,  MSG2/AH  , AH  SUR.AHVEYI/, 

1  MSG3/AH  ,AH  C.AHRSTt/,  MSGA/AH  VIE, AHM-PL , AHANE  I/, 

2  MSG5/3H  R, AHOLL  , AH  PI.AHTCH  , AH  Y, AHA  M  / 

OATA  I VIEM/AHXY  , AHXZ  , AH YZ  , AHOFF  ,AHAXIS/ 


00001000 
00001100 
00  001 2J  0 
00501300 
03  00 1 A0  0 
00001530 
00001600 
00001730 
00001800 
0  L  j  C 190  0 
0u*Ci2jQQ 
00002100 
Jo  J022u0 
0C3323G  0 
0LJ02400 
0'J  00  250  0 
00  0  026a  Q 
00392730 
00002600 
or  302930 
0C3O3OOU 
0  090  310 0 
QC  3  0320  0 
90  90330  0 
00903400 
00103500 
0run3600 
00003700 
0G  00360  0 
00003900 
00  J04900 
00004100 
00904200 
0v>  30430 0 
00004400 
00004500 
0  0 0  0460  0 
0M0473G 
QC0046JO 
00304900 
40005030 

mansion 

00005200 
0  C  3  3  530  0 
■J  V  3 1#54 0  0 
09305500 
09335600 
04035700 
Oa 005  60  0 
009359UC 
00996900 
00306130 
00  i  C62J  0 
000C6309 
liw  09640  0 
9C  3  G  65a  0 
00006600 


301 


OOO  O  O  o  O  o  ooo  ooo  ooo 


ICQLOR ( 1) *1 
ICQLOR ( 2) *1 
IC0L0R(3) *2 
ICOLOR( 4) *3 
READ ( 5  #  C  NT  RL ) 

WRITE  (  6 ,  CNTRL) 

C 

C  READ  IN  PLOT  NUMBERS  FOR  THOSE  NOT  WANTED  (IN  ANY  ORDER) 
READ (5,80  (IPLOT(I) ,1*1,20) 
ai)  FORMAT  (2U(1X,I2)  ) 


PLOT  INITIALIZATION  FOR  OFFLINE  CALCOMP  PLOT 
CALL  PLOTS  (OATA, 1224, 7) 


MOVE  THE  PEN  TO  THE  -Y  LIMIT  SWITCH(PEN  PLOTTER  ONLY) 
CALL  PL OT ( 3« ,-2«,-3) 


SET  THE  MARGIN 

CALL  PLOT ( 1.  ,!♦  ,-3) 

IPC*3 

ROUTINE  TO  CHECK  IF  PLOT  IS  WANTED 

5  IPCNT*I PCNT+1 

00  145  ICHECK*1,23 

IF ( IPCNT  •  NE  •  IPLOT (ICHECK) )  GO  TO  145 
SKIP  PLOT  OATA  SUBFILE 
14-3  READ(a,90)  0ATAQ1 
IF ( EOF ( 6) ) 130,141 
141  IF ( DAT A01  *NE.  ENO)  GO  TO  140 
WRITE (6, 15 3)  IPCNT 

15Q  FORMAT ( IX, 9HPL0T  SET  ,I2,28H  WAS  NOT  PLOTTED— BY  REQUEST) 
GO  TO  5 
145  CONTINUE 
IPC*IPC*.i 

ROUTINE  FOR  READING  OATA  OFF  TAPE 

REAO(a,10) MAXO,NWXYZ,NKEY,NLNKS,NXYZ,SCLE,XO, yo,n, ipersp 
IF(E0F(8)) 130,12 

10  FORMAT (14,  213,12  ,I4,F4.  2t  2F7*2,2I2) 

12  READ (3, 30)  ( OX ( I) , 1*1 , MAXO) 

REA 0(8, 30)  (OY(I) , 1*1 , MAXO) 

30  FORMAT ( 16F5«  2) 

RE AO ( a, 35)  (KEYT  AB ( 1 ,1)  ,I*1,NKEY) 

REA  0(8, 35)  (KEYT  A8 (2,1) ,I*1,NKEY) 

READ (8, 35)  (KEYTA8(3,I) ,I*1,NKEY) 

35  FORMAT (1615) 

00  53  1*1,2 

READ (8,40)  (MIN TAN (I, J) , J*1 , NLNKS) 

REA  0 (3 , 40)  (MAXTAN (I , J) ,J*1, NLNKS) 


Ou  0  0673 0 
QC  336800 
00006900 
03GG7330 
003u7100 
00007200 
00  30730  0 
00007400 
Q0GS750  0 
00)07600 
00007700 
00007800 
0000790 0 

ooocanoo 
00008100 
0000.8200 
00308330 
00008400 
00008500 
30008630 
00308700 
00308800 
00008900 
00309400 
00009130 
00309200 
00309300 
3  0  0  Q  940  0 
30009500 
00009630 
00009700 
00309800 
00309903 
0031*430 
00  310 100 
00010200 
00310300 
0*  110  40  0 
00 110  53  0 
00313630 
OC  310  73  0 
00314800 
00*110  900 

uooiiooa 

00311130 
00311230 
0*311300 
00  311403 
00311500 
03111630 
00311730 
33311800 
00311900 
0431200  0 
0*012100 
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40  FORMAT  <231 4) 

50  CONTINUE 

READ (5, 60)  IRSRV(l)  ,IRSRV (2) , ISRVY < 1) ,ISRVY<2) ,IWKSP<1)  ,IWKSP(2) 
60  FORMAT ( 2Q A4) 

READ <6, 65)  P VIEW, ROLL, PITCH, YAW 
65  FORMAT  < 12  »  3F10 • 2 ) 

READ  <  6,90)  ENOFLE 
90  FORMAT CA4) 

IFC ENOFLE  .EG.  ENO)  GO  TO  151 
WRITE(6 ,110)  N 

113  FORMAT (IX, 33HINC0RRECT  AMOUNT  OF  OATA  FOR  PLOT, 12, 

-17H  —PROGRAM  ENOING) 

STOP 

PLOTTING  ROUTINE 
151  CONTINUE 

SPECIFY  COLOR  FOR  THE  BANNER 
CALL  NEWPEN<lCOLOR(l)  ) 

PLOT  THE  BANNER 


REGRESSION  MEMBER 

CALL  SYMBOL  ( 1.  ,1.25,.  35, MSGKi) ,90 .,4) 

CALL  SYMBOL ( 999. ,999. ,.35,MSG1(2) ,90. ,4) 

CALL  SYMBOL (999. ,999# ,.  35 ,MSGl< 3 )  , 90 . ,4) 

CALL  SYM80  L(  999.  ,999* ,. 35 ,IRSRV (1) , 90* ,4) 

CALL  SYMBOL (999. ,999, ,  .  35  ,  IRSRV  <  2) ,90. ,4) 

SURVEY  MEMBER 

CALL  SYMBOL  < 1# 5 ,1. 25 , • 35 ,MSG2 ( 1) ,90 .  ,4 ) 

CALL  SYMBOL  ( 999 •  ,  999. , • 35 , MSG2 ( 2) , 9 0. ,4) 

CALL  SYMBOL ( 999* ,999. , . 35 , MSG2 ( 3 ) ,90 . ,4) 

CALL  SYMBOL  (999*, 999., .35, ISRVY (1) , 90 • ,4) 

CALL  SYMBOL  <999. , 999. ,.35,ISRV Y(2) , 90. , 4) 

CREW  STATION  MEMBER 

CALL  SYMBOL  (2. , 1.  25,. 35, MSG3 (1)  ,90. ,4) 

CALL  SYMBOL  (999. , 999. t *35,MSG3 < 2) , 90. ,4) 

CALL  SYMBOL  ( 999. , 999. , .35, MSG3 (3) , 90. ,4) 

CALL  SYMBOL  (999., 999. , •35,IWKSP (1) , 9C . ,4) 

CALL  SYMBOL  (999. , 999. ,.35 ,IWKSP (2) ,90. ,4) 

VIEW  PLANE  I 

CALL  SYMBOL (2. 5,1. 25,. 35, MSG4(1) ,90. ,4) 

CALL  SYMBOL  (999. , 999. ,.35,MSG4 (2) ,90. ,4) 

CALL  SYMBOL  (999 *, 999. , •35,MSG4< 3) , 90. ,4) 

VIEW  XY,  XZt  YZ,  OR  OFF  AXIS 
CALL  SYMBOL(  999.  ,999.  ,.,35,IVIEW  (PVIEW)  ,90.  ,4) 

IF ( PVIEW.  EQ. 4) CALL  SYMBOL (999.  , 999. ,. 35,1  VIEW (5) , 90 • ,4) 


00012200 
00J123Q0 
00 112  40  J 
00912503 
00012600 
03012730 
3?  01230  0 
0*312901 
00013300 
Owi  1313  0 
00213200 
00313300 
0  *  3 1340  0 
00013500 
0b  0 1360  0 
00913700 
01313800 
00  01390  C 
0  0  014*00 
0Qd4l3G 
0  0  01420  Q 
00014330 
QO  0 1440  0 
0001450  0 
00114600 
1*114700 
00014600 
000149b 0 
00  015  COO 
00315100 
00015200 
0OU15330 
00115400 
00315500 
092156u0 
00015700 
0C  01560  0 
00315900 
00316000 
00116130 
00016200 
00016300 
00016400 
0031650  O 
00016600 
39016700 
00016600 
3H1690  0 
00017300 
OLJ171uO 
03917200 
00317300 
00017490 
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ROLL,  PITCH,  ANO  YAH 
CALL  SYMBOL ( 3.  C  ,  1.  25, *35, MSG5 (1) ,90.  ,3) 

00  155  1=2,6 

155  CALL  SYMBOL (999. ,999. ,  •  35 , MSG5( I),90«,4) 

ROLL  ANGLE  IN  DEGREES 

YINC*0. 

IF ( A as (ROLL) . GE. 10 • )  YINC=.175 

IF ( ABS (ROLL) .GE. 100. ) YINC*. 35 

IF ( ROLL. LT. u.  ) YINC*YINC+.  175 

CALL  NUMBER( 3*5 , 2.  12-YINC , . 35, ROLL , 90# ,1) 

PITCH  ANGLE  IN  DEGREES 

YINC=. . 

IF ( ABS (PITCH ) • GE.I3. )  YINC=.175 

IF(A3S( PITCH) .  GE.10C.  )  Y INC*. 35 
IF (PITCH.LT. 0#) YINC*YINC+.175 
CALL  NUM8ER(3.  5,4*  75-YINC ,*.35, PITCH,  90.  ,1) 

YAH  ANGLE  IN  OEGREES 

YINC=0. 

IF ( AQS ( Y  AH ) «  GE. 1 0.  )  YINC-.175 

IF (ABS (YAH). GE.1U0. ) YINC*.35 

IF( YAH. LT. J. ) YINC=YINC-.175 

CALL  NUM8ER(3.5,7.55-YINC,*35,YAH,9Q. ,1) 

PERSPECTIVE  OR  NON-PERSPECTIVE 

IF ( IPERSP. EQ. 1) CALL  SYMBOL (4. , 2. 65,. 35 , 15HNON-PERSPECTIVE , 90. , 15) 
IF ( IPERSP. EQ. 2) CALL  SYMBOL (4.  ,3.  35,. . 35, 11HPERSPECTIVE, 90^,11) 

SCALE 

IF ( FACTR. NE,  99. )  SCLE-FACTR 

CALL  SYMBOL ( 4. 5, 3.  35,.  35, 6HSCALE*,90. ,6) 

CALL  NUM8ER( 999. ,999. , . 35 , SCLE , 90. , 2) 

PLOT  NUMBER 

plT  =n 

CALL  SYMBOL  (5.0,3.  7  ,.  35 ,5HPL0T* ,  9C  * ,  5) 

CALL  NUM0ER( 999. ,999* ,• 35 , PLT, 9m. ,-l) 


RESET  ORIGIN 

CALL  PLOT (7.  ,0.,-3) 


GO  TO  MAN-MODEL  ANO  CREH  STATION  PLOT  ROUTINE 
CALL  CBMCP2(0X(1) ,OY(l)  ) 

CALL  FACTOR (1. C ) 

CALL  PL OT ( 12* ,0. ,-30 
GO  TO  5 

PLOTE  CLOSES  OUT  THE  PLOT 
130  CALL  PLOTE  (AA) 

STOP 

END 


031)17533 
0  Q  31760  C 
00  3177a  0 
0U J178&Q 
00017900 
0  0  Old  0 
03010100 
00 1182a  0 
0031830  G 
0001840  Q 
00018500 
00318600 
0001873 1 
00018800 
00318900 
COJ19030 
000191U0 
00 1 19  20  Q 
0001930  0 
00319400 
00 119  50  0 
00019600 
00319730 
03019800 
00 31993  0 
00320000 
00320100 
000 202a  0 
00020  30  Q 
0m0  2040  0 
OC 1 2050  0 
00020  630 
00320700 
30  320  80  0 
00020900 
00321UU0 
03)2113 0 
03021200 
O'1  3  2133  3 
00 ) 21 400 
00121501 
0r^216u0 
00021700 
00021800 
00021900 
00?22auC 
0C  02210 0 
00022201 
03  0  2230  0 
0Q  0224*3  0 
00322500 
03122600 
00322700 
3^322800 
0m  3  2290  0 
a:  J230CQ 
la  12310  0 
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C0MCP2  -  CALCOMP  PLOT  OF  C0M8IMAN  SECOND  SUBROUTINE— AOJUSTEO 
FOR  PLOTTING  OFFLINE. 


CALLEO  BY  - 

CBMOFF  -  CALCOMP  (R)  PLOT  OF  CQMBIMAN  MAIN  S/R 


CALLS  - 

PLOT  -  CALCOMP  ROUTINE  (ORAW  LINE  OR  POSITION  THE  PEN) 
SYMBOL  -  CALCOMP  ROUTINE (ORAW  A  SYMBOL  *  CHARACTER,  OR 
CHARACTER  STRING) 

NEWPEN  -  CALCOMP  ROUTINE  (CHANGE  THE  PEN  COLOR) 


INPUT  FROM  - 
(NONE) 


OUTPUT  TO  - 

UNIT  7  -  PLOTTER  OATA 


PARAMETERS  - 

X  -  ARRAY  OF  X  VALUES  TO  BE  PLOTTEO 
Y  -  ARRAY  OF  Y  VALUES  TO  BE  PLOTTEO 


SUBROUTINE  C8MCP2<X,Y) 

REAL  X(i)  ,  Y(i) 

COMMON/CBM XY Z/  KEYTA8  <  3 ,250) ,NLNKS,MINTAN(2|40> , 

1  MAXTAN  (2,40  ,NKEY,NXYZ,IC0L0R(4>  ,  FLESH ,  FACTR  ,SCL  E 
INTEGER  HIER(20) , FLESH 

PLOT  MAN-nOQEL  ANO  CREW  STATION 

CALCULATE  PLOTTING  FACTOR 
SCALc*FACTR/SCLE 
IF(FACTR.EQ.99»)  SC  AL£31« 

CALL  FACTOR(SCALE) 

PLOT  THE  LINK  SYSTEM 

J«IA3S(KEYTAB(2,i) ) 

HIER(J)  *1 

CALL  PLOT(XCl) , Y(l) ,3) 

00  50  1*2, NLNKS 

C 

C  SPECIFY  COLOR  FOR  LINK  SYSTEM 
CALL  NEWPEN(IC0L0R(2)) 

c 

J* I ABS (KE  YTAB ( 2 , 1 ) ) 

K«KEYTA0(1,I) 

HIER (J) *1 

C  LOCATE  COORO IN  ATE  OF  PREVIOUS  POINT  IN  THE  CHAIN 
L»HIER( J-i) 

CALL  PLOT  (X  <L )  ,  Y(L )  ,3  ) 

10  H*2 


OC j23233 
0012334 0 
00023400 
00023500 
OC 1 2360  0 
30023740 
00023500 
QUO  2390  0 
00024000 
00*24100 
32024203 
00324300 
00 02440 Q 
00324500 
00  J  24600 
00*24700 
00024500 
Ou  324900 
OC  025 JO  0 
30325  100 
OC 2 2520  0 
00025300 
3  C  3  254o  0 
00025500 
00025600 
00025730 
00025500 
03  3  2590  0 
30026000 
03326100 
00026200 
30026300 
0  J  *  264*  0 
OP  3  2650  0 
00  Q  2660  0 
00026730 
00  32654  0 
30 026900 
00327330 
30  3  2710  0 
Ob  3  2723  0 
00027303 
00027400 
OC  0  2750  0 
00327630 
00027700 
00327830 
OU  32790  0 
03025000 
Ob  328 lO  0 
OC  32823  C 
33 328300 
30028  400 
00025500 
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CHECK  IF  OMIT  OR  INCLUOE  STATUS 

00  32660  0 

IF  (KEYTA3(2,I).LT.G.ANO.KEYTA8(3,I).LT.O)  M«3 

Ju  J  28  79  0 

CALL  PLOT ( X ( I) ,  Y(  I ) ,M) 

00028803 

J»IA8S(KEYTAB(3,I) ) 

00328900 

IF  (J.  EQ.  1)  GO  TO  50 

00029000 

00329100 

PLOT  ENFLESHED  MAN-M00EL 

00329200 

IF( FLESH. EQ» 1)  GO  TO  50 

00329300 

30  KP*KEYTA8(i,I) +NLNKS-1 

0  C  3  29  40  0 
00  32950  0 

SPECIFY  COLOR  FOR  ENFLESHMANT 

0?  0  2963  0 
00029700 

CALL  NEHPENdCOLOR  (3)  ) 

00129800 

Ll*KP+KEYTAB(3,2)-2 

00029900 

35  00  45  L2»KP,L1 

00330000 

CALL  SYM80L(X(L2)-.04,Y (L2) ,.175,1H. ,0.0 ,i,.  175,0) 

00330100 

45  CONTINUE 

00  3  3020  0 

IF  (MINTAN(1,I) .EQ.C)  GO  TO  50 

00030300 

L1»MINTAN  (1,1)  ♦NLNKS 

300  3040  0 

L2*MINTAN (2,1) +NLNKS 

00030500 

CALL  PLOT (X(L1) ,Y(L1) ,3) 

00030600 

CALL  PLOT (X (L2) ,Y(L2),2> 

03030700 

L1*MAXTAN(1,I) +NLNKS 

003  30  80  0 

L2*MAXTAN (2 , I) +NLNKS 

00330930 

CALL  PLOT  (X  (LI)  ,Y  (LI)  ,3) 

00031000 

CALL  PLOT (X (L2)  »Y (L2) ,2) 

04 3 31100 

50  CONTINUE 

0l  3  3123  0 
00031300 

PLOT  CREW  STATION  PANELS 

01 C  31410 
00031500 

IF  (NLNKS.EQ.NKEY)  RETURN 

03031630 

IIaNLNKS+1 

00131730 
00 331803 

SPECIFY  COLOR  FOR  CREW  STATION 

03031900 
ICO  32  JO  0 

CALL  N£WPEN( I COL  OR ( 4) ) 

00132130 

00  aa  I*II ,NKEY 

0C1322C0 

K*KEYT  A8( 1, 1) +NXYZ+NLNKS 

0C  03230  0 

CALL  PLOT (X (K) , Y(K) ,3) 

0  00 3240  C 

M*2 

05*32500 

IF  (KEYTA8(2,I) .LT.O.ANO. KEYTAB (3,I).LT«2)  M*3 

013326*0 

J*IA8S(KEYTA8(3,I) ) 

10032730 

L*K*i 

00332  800 

K-K+J-l 

00032900 

OO  60  J»L,K 

lC.)33dJU 

60  CALL  PLOT (X ( J) , Y( J) ,M) 

000 33100 

80  CONTINUE 

03033200 

RETURN 

00  ) 33300 

END 

30133400 
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APPENDIX  C-6 

COMBIMAN  SOURCE  -  CBMCDM  LISTING 


C* 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c 

c* 

c 

c 

c 


c 

c 


CBMCCM  -  ORE*  $T  AT  I  Cl.  OAT  ABASE  MAINTENANCE  MAIN  ROUTINE 

calls  - 

CeMtuP  -  HEADING  AM)  PAGE  COMKoL 

CdMlAT  -  OATL  Aixu  TIME  FROM  SYSTEM 

C6MJT4  -  COMPUTES  DETERMINANT  OF  A  hXi  MATRIX 

CbMIKl.  -  TRANSLATES  CCCKC  FROM  AC  1L  SKP  SYSTEM 

I  N  FoT  F  RuM  — 

UNIT  I  -  CP.  tri  STATION  DATA  BASE 

jmt  -  Command  c  oat  a  statements 
output  to  - 

UMT  1  -  CRtk  STATION  OAT  A  dASE 
UNIT  o  —  PRINTER 

JMT  7  -  CakG  PUNCH 

NoTE  S  IGmIFJCaivCE  CF  TYPE  CCDcS  AS  FoLLC^S- 
0,1  -  SIANOAKO  WORKPLACE  PANEL 

2  -  SEAT 

3  —  n. UO 0  c  rs /  EkAK  E  PEDAL 

A  -  CCNTKCl  STICK 

5  -  THROTTLE 

fa  -  ClLLFCTIvE 

7  -  WhcEL-TVPE 

THE  MAXIMUM  NUMBER  OF  TYPE  CuCES  FCk  SPECIAL  PROCESSING 
IS  13. 

*  *  *  t  *  *  ***$:***$:£♦<:********$**♦*** 

UtPINE  FILE  1  l20jJt<;u*Uf  1  A V  1  ) 

COMMON  /  CtMNOt/  IM1  «  10Y  ,  1  Yi< «  IhKv  1KN«  1  SC  «  IPG  *  I  LK 

I  NTEo  tf'  Mi  A  X  r\  t  C  /  2  U  0  0  /  »  I  h  K  S  P  /  4  rt  *  K  S  P  /  ,  b  L  AN  K  /  4  F  /  »  P  N  \  t 

1  ICEL/4h*uEL/»IAGD/4Hi>ADJ/tIENJ/4FiENu/* 

2  I  I  NT /An  4. 1  *T  /  *  IP  FT  /  «i  H  Y>  P  R  7  /  «  1JMP/4F10MP/  » 

3  I P uh/4f iPCn/ ,  1 C  FK  /  4h  i  U-f\  /  ,  I C  M  P/ 4  h  3>C  MP  /  ♦ 

A  1  uoNPI  23J  t  i  PA  (6)  ,  IPY(  c  )»  IP2(  c  JtNAME  (2  )  t  !NAl*t(  2  )  9 

5  I TYP ( fa  I / 1HF , lhA , IFL , lhK,  IhU.  lFO/f 

o  I  TYPE l 6)/l t-1 . 2 t-2 1 3 t-3/ t iuTQ(4 )/2 ,21 »22t2I/t 

7  PNM  300) ,  PKAMIEI  2, 310)  ,PT  YPtl  JCO  J  ,PN  vRT  (  3CG )  , 

b  cNA.Ic  (2  t3  vC  )  »CTY  PE(3UC  > ,CPNL  <  2CG ) »  C PT ( 3 OC )  ,  NPNLT  (Id) 

PEAL  bLS  XY2  1  3 ) tCxv2( 3i300)  ,LR  IGIM  3) t  PXY2(  3  ,6 ,3CC)  , 

1  PX<  o ) ,PY  (6 J  »P2 (o ) 

CALL  C  B  v  U  A  T  (  1M.T  ,  I  i)Y  ,  i  Y«  ,  1  ,  I  HR  f  IMN  ,  I  SC  ) 

I  ?G=0 

PACE  COUNTER 


000  UO loo 
000  0U20o 
000  uU30u 
UOO  00  AGO 
0 00 00  50u 
OGoGuoGC 
OOOUu  7U0 
U  Ou  0 U  fa U  u 
OOOOOSuO 
0  00  u  1  OuU 
00001 Iuj 

00001 20w 

000  ul 300 
UOO  01 huO 
0  00  01  5  U  \j 
000  ul 6uO 
000  0 1  7t  J 
0  uO  0 1 BuU 
000019u^ 
0  Ou  02  uuO 
UOU  02  I  uO 
0  00  02  2 Uu 
000 02  300 
0  JO  U2  A  Cl 
0  Ou 02  5uU 

0  00  02  fauu 

0 uu  02  7uO 

0  00  02  6Uu 
0  00  02  Suu 
0  <jU  0 3  0 u  J 
0  Ou  u j 1 Ou 
u  o'w  03  2  C  u 
0  00  03  3u  j 
0 J0C3AU^ 
000U3300 
0  CO  0  3  fa  00 
00003  7t  ^ 
uODOjbGu 
0  00  03  400 
OCOOAOUw 
00004  luO 
OOu 042wo 
OOOOA  300 
0000440 0 
OOu  04  5uO 
OOOOAou 0 
0 00  04  70  J 
OOOCAbOu 
0  00  U4  400 
00005  COO 
0  uO  05 loO 
G0u052uU 
000033CQ 
00u05 auu 


hLAJ  CO  A  N  u  C  AR  U  Ai\C  PROCESS  IT  00005500 


terminate 

PkOukAM 

IF 

cLMVANC  (UPfaR)  IS  INVALID 

OCO  05  faOO 

[O  |  iiO  i  I  Cw  ~k  i  | 

Rt/u  (  5  ? I C  CO 

. LKu=  72 C 1 

1  I  OPK  vi*  AM  t  •  N  PNL  S  »  i\  C  T  L  StULSXYz.,  Ix»  IY  •  12 

U  UU up  I  u  u 

000  05  bO J 

I  F 

(  I  C  Kt\  •  E  L  • 

ICHK)  GO 

TO 

I  5 

00005400 

IF 

1 I LFR. EC. 

i All)  Cc 

TO 

2  C 

OOOOtuOU 

l  F 

1  ICrrs.EC. 

ICED  CL 

TO 

2  0  C 

OOOOo  lOO 
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noon 


C 


C 

O 

C 


1  5 


C 


IF  (  ICPR.Et.I I  NT) 
I F  ( I CPK. EC. 1PRT ) 
IF  ( ICPF.EL.ICMP) 
IF  (  ICPK.EC.IPCh) 
IF  (  ICPR.EC. ICMP) 
IF  (  ICPk.EC.IENC) 


GC  TO  25C 
GC  TO  30C 
GC  TO  400 
GO  TO  500 
GC  TO  60 C 
GC  TO  700 

INVALID  COMMAND 


CALL  CBMCCP(O) 

Vs  R  IT  E  (6.  ICO  I  )  10  PH,  NAMEtNPNL  S,NCUS,  EC  SXV  Z  ,  I  X  ,  I  Y  ,  I  2 

*  k  IT  E  (6,20oQ)  IOPR 


S  I  CP 


END  PROGRAM 


CHECK  CRB*  STATICN  CAT  A  MEMBER 


CCNT I NUE 

JCrK  =  -2  147463647 

GC  TC  21 


JCFK  CONTROLS  *F  I T  E  TC  OATA  ttASE 


ACO  CREW  STATICN  CAT  A  MEMBER 

20  CuNTINUE 
JCFK  =  0 

21  CONTINUE 
CALL  CBMCCP(O) 

wRITE  (o ,  1001 )  IOPR , NAME  »NPNL  S,NcTL S , BCSXYZ,lX,lY,IZ 
OC  22  1=1,13 
N  FN  L  T  (1  )  *  0 

C  CLEAR  PANEL  T YPE-tCLNT  AR*AY 

22  CONTINUE 

IF  (  N  A  ME  (  1 )  .h E  .  Bl  A.*K  .OR . N A  ME  I  2).  NE.  BLANK)  GO  TC  23 
C  BLANK  CRE*v  STATICN  NAME  READ 

CALL  C BMC  CP ( 1 ) 
aR'ITB  ( 6 , 2  0 0  5  )  IuPk 
■oC  T  C  10 

C  F  E  AO  NEXT  CCMMANC  CARD 

23  CONTINUE 

IF  (NPNLS.GE. 1 • ANC.NPNLS .LE. 3 CO. AN C.NCTLS. GE. 1 . A ND . NC TL S . L E .3  CO ) 
1  GC  1l  25 

C  CHECK  NUMBER  OF  PANELS  ANC  CONTROLS 

CALL  CisMCCPt 1  ) 

*R  ITF  (6 , 2 C07 )  NAME 

C  ERROR  IN  PANEL  OR  CONTROL  CCuNTS 

GC  TO  LU 

C  READ  NEXT  COMMAND  CARD 

25  CCNTINuE 

OC  3D  1= 1 ,6 

IF  (  1X.K.11YPII  )  )  GC  TO  AO 
C  CHECK  X  AXIS  DIRECTION 

3  C  CCNT I  Nub 

CALL  C  BMC  CP ( 1 ) 

*  R I T  E  ( 6 , 2  C  0  s )  lx, NaME 

C  WRONG  X  AXIS  CIRLCTIUN 

GC  TO  ID 

C  k  c  AO  NEXT  COMMAND  CARD 

40  CUNTlNut 

I  a  1  =  Ubil  1  T  Y  P  E  (  I  1  ) 

1X2  *  IS  I  C-.\(  1  ,  I  TYPE  U)  ) 

P  C  50  1=1,6 


00006200 
00006300 
00006400 
000  06  500 
0  00  U6  600 
00006700 
000  06600 
00006500 
00007000 
00007 luO 
00J072U0 
000  07  3u0 
0  Ou  07  400 
000  07  500 
00007  600 
000077UO 
000C7  cOJ 
000075uw 
000  08  GOC 
OOGOblOu 
00006200 
00006300 
DOu  Oo4uu 
000  06  5u0 
00006600 
0 00 Ot  /GO 
00C066G0 
0  0006  *UJ 
0  OG  05  GC  0 
0  Ou  09  10  j 
0 JCG9200 
0  uu  u9  30  J 
G00054O0 
0  uC  09  50u 
00009 60U 
0  OG  04  700 
0  OG  09  800 
UU0U5 4G0 
OOulOOOO 
00010100 
u  Ou  1 0  2  Ou 
00010300 
00010400 
00010500 
0  00 1 0  600 
G001G  700 
000 loBUO 
00010900 
OCOllGGu 
000 1 1 lUu 
0 JO  11 200 
000115U0 
OOG 1 1 400 
OOul 1 500 
OOOllcOO 
00011 700 
00011 80 J 
0  uu  1 1  9u0 
U  00 12 OUJ 
000  12  ID J 
GGj 12  200 
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o  o  r*  o  o  o  o 


IF  {  IY.EC.1TYPI I J  )  GC  10  60 

C  CHECK  Y  AXIS  DIRECTION 

50  C  C  NT  1NUE 

CALL  CriMCCPU) 

W  *  IT  E  (6  »  2  C09  )  I Y  t  N AME 

C  WRONG  Y  AXIS  DIRECT  ION 

GC  TC  10 

C  R  E  AO  NEXT  COMMAND  CARO 

60  CONTINUE 

I  i  I  =  IAdS  {  1  TYPE!  I  )  ) 

1  Y2  =  IS IGN(1 tITYPfc (1) ) 

CC  70  I—  1  » 6 

IF  {  1Z.  EC.iTYPd  )  )  GC  TO  72 

C  CHECK  l  AXIS  DIRECTION 

70  CL  NT  1  NOE 

CALL  LtMCCP(I) 

»>  R  I T  t  ( o  *  2  C  10  }  I Z  ?  N  A  N  E 

C  M CNu  z  axis  direction 

GC  TC  10 

C  K  t  AG  NEXT  COMMAND  CAinD 

72  CCNTINcE 

1ZI  I A  b  S  (  1  T  Y  P  E  (  i  )  ) 

I  12  *  IS  I  CM  1  f  HYPE  II)  ) 

IF  (  IX1.M.  IY  UaN0.IXI.NE.  IZI.AND.IY1.NE.IZ  1)  Cl  TC  74 

C  lHECK  FuR  oNlCUE  X.  Y»  S  Z  DIRECTIONS 

call  coMccptn 
*  *  I T  t  ( t> «  2  C 1 1  )  NAME 
GC  TC  10 

C  X  ♦  Y »  LI  DIRECTIONS  NCT  UMOUE 

7 A  CCNT 1NUF 

READ  (Ply  ER<\-8  ID  )  Jn*SP«  III t  II2« 101 t  IJ2« MAX 

C  tvE^G  FIRST  RECORD  CN  DATA  bASE 

IF  (  JWKSP.NE.  UnSP  )  GC  To  610 

C  CHECK  CRtW  STATION  CmTA  bASb  IDENTIFIER 

IF  {  I  C2+  W  PNL  i  ♦  NCT  L  I  .L  E  .  M  AX  )  C-J  To  7c 

C  CHECn  IF  TnERE  IS  SAPlE  TC  Auo  JATA 

L  A  LL  Cb:*iL  lP(  1  I 
S  RITE  { o ♦  2  00  1  )  NAME 

C  PRINT  -  NC  SPACE  TC  ADD  DATA 

J  L  Fk  =  JCHK+1 
7  t  CCNT I NUE 
I cCE  =0 

INITIALIZE  DIRcCTORY  kElOKC  COUNTER 


REAL  RECORDS  IN  THE  DIRECTORY  AND  ChECK  M SERNA  F  E 
ENThlcS.  IF  Tut  NAME  REAu  r  R  C  M  InPoT  EXISTS  ON  ThE 
DIRECTORY  THE  N  Em  MEMBER  IS  NCT  AGCED.  IT  THERE  IS 
SPACt  CN  TFE  JIKElTORY  AGAIN  TFl  DATA  IS  NwT  ADDED. 


DC  80  1=  ill.  1  12 

R i AC  { I  '  I t  cFK  =  85  0  )  {NAME  t 103  9 10* • 1PNl5« 1C 1LS  tCKlGl b 
IF  l  NAME  {  I  )  .  EC  .  IN  AML-  (1  )  .AND  .  NAME  {  2  )  .  EC  .  IN  A  ME  (  2  I) 

I  GCTCuJO 

C  yEFbtR  NAME  EXISTS  -  lANNlT  ADD  DATA 

IF  (INM^E(li.EC.JLAfsK.aND.lNAME{2).EG.BLANK)  l  riOE=  I 
3  C  CCNTINlE 

IF  (  l  ECL.NE. J )  CL  K  62 
CALL  CSMCCPIl) 

*» RITE  (  o  »  2  C  1 2  J  NAME 

L  PKInT  -  GlRbuTuRY  IS  FULL 

JCFK  =  JCFK+1 


0  00 12  juu 
0001 2  ADO 
000  12500 
00G126UU 
0J01270O 
0  OU 1 2  8uu 
0  00 1 2  SOU 
0  CO  1 3  uGO 
0  Du  1 A  1(J0 
0  00 1 3  2  OD 
0  Du l d  3uO 
OOG134UO 
0  DO  1 j  5uu 
0 Ou 13  oUu 
0001 3  70u 
0  JO  1 3  600 
OJOld^uj 
0  00 1 A  OQu 
0  JO  1  *♦  1  Ou 
000 142uQ 
00014  juO 
0  JO  I  *t  4  u  u 
0  Ou 14 5uG 
0  uO 1 4  oOu 
0 DO  1 4  7uu 
0  Ou  1 4  6  uu 
0  GO  1 4  4  Gu 
0  UU 1 5  UuO 
ODD  1 5 luC 
0  Uu  1  5  2  0  J 
JUU I  5 3UG 
0  00  1 5  Ou 
Ouu  1  5  5uJ 
0  u  0  I  5  c  U  u 
Ouu 1 5  7uG 
0  JO 1560U 
0  JO  1  5  *  uu 
0  00  1  o  OU u 
00016100 
0  00  1  c  2  Ou 
00016300 
0  JO  1  o  4  0  J 
00016  50u 
Ouu 16 tCu 
uJUlt>7uU 
U  uO  1  o  fcu  J 
OOulcSGO 
0  UU 1 7  DUO 
0001 7 100 
0  0017  20 j 
000 1 7  3uu 
0  00 1 7  4C  u 
0  JU 1 7  5U0 
0  JO  1 7  6u0 
00017  700 
0  00  1  7  b  uu 
000 1 7  SuO 
0  uO  1  U  uUO 
OUulo  IOJ 
ODD  1 c2uu 
0001b  30u 
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•>oooooo  no  r>  o  ooo 


82  CC  NT  I  NOE 
I C  2  =  ID2  +  1 
1  D  4  =  ID2+NPNLS+NCTLS 
CALL  CBMCCP(3) 

wRITE  (t> »  20 1 9  J  NAME  ,NPMS,NCTLS,  iSCSXYZ,  IX,  IY,  12 


real  coordinate  lata  for  all  panels  and  process 


0  00 1 8  400 
000  13  SOU 
00018600 
GOUl 87uu 
00016800 
OOOl 890u 
0  00 19  COO 


DC  UC  I  =  1 »  NP  NL  S 

READ  (5  ,  ICC2»EN0=720J  PNC  (1) , ( P NAME ( J , 1 ) » J= 1 , 2 ) , PT YPE (I) , 
I  PNV, (PX ( J) , PY( J) ,PZ ( J) , J*l, PNV) 

K  =  1-1 

DC  82  J= l ,K 

IP  ( I  • Nt • 1. AND. PNC ( J )  .EC  .PNG( I  ) )  GC  TC  6s 

LPECK  PGR  UNICOE  PANEL  NUMdEk 

63  CLNTINUE 
GC  TC  66 
8*1  CCNT1NUE 

C/LL  ClMCLP(I) 

»r!TE  (  o»  202  5)  (  PN  ARE  (  L,  1  ),L  =  1 , 2  ) ,  (  PNAME(  It  J  )  ,L=1, 2) 

JCHK  =  JCHK+1 
6  6  CONTINUE 


OOU I  9  I Ou 
000 19200 
0  uO 19  30u 
OuO 19400 
OuO 1 9  5uO 
00019600 
00019700 
0001 9  8U0 
000  I  9900 
000200u0 
0 0020  I Ou 
000202OU 
0  oO 20  3uO 
OOC  2G4Cu 
00u20  600 


l 


07 

86 


89 


92 


9  i 


94 


lr  (I.eO.l)  Ou  TO  ES  00o2oo0U 

CC  67  J*  I  »K  0 0o2 o 7 oo 

IF  (  Pn  AF  E  (  I  ,  J  J  .  EO  .PNAfiE  (  1,1  )  .  AN C .  PN  AM  t  (  2  ,  J  )  .  E  w .  PN  AGE  (2,1)1  00u2O6o0 


Go  T 0  6b 

00020900 

CHECK  FOR  oMCLE  PANEL  NAME 

0  00  2 1 ooO 

CCNT IfvjE 

0  Ou  2 1 1 00 

Gl  TC  o 9 

OoO  2 1 2o0 

CCNT  INuE 

0  Ou21 3o0 

C/LL  CoMCLP ( 1 ) 

00021 400 

WRITE  ( o  »  2024 )  ( PWAML < L ,  I  )  ,L  =  1 , 2 ) , PNC ( J ) • PNC ( I ) 

OOO  2 I  bOu 

J  CPI  K«  JC  r»K  4  1 

0  00  2 I 6  00 

CCNT  1  No  E 

00021 700 

IF  (  PTYPfc  ( 1  )  .LT  .  O.CK.PTYPEl  I  )  .GT  .  15)  Gc  TO  9c 

0  o0  2 1 600 

CP  ELK  PGR  VALID  PaNEL  1YPE 

00021 900 

IF  (  PTYPE (  I J  .  EC.O  J  PTYPE (  1  )=  1 

0  0o22  OOO 

COUNTER  PGk  PANEL  TYPES 

00022  loo 

NPNLT (PTYPt (i ) J  =  NPNL1  (PTYPE ( I  ) )  +  l 

00022200 

GC  TC  93 

00022300 

CCNT  I N J  E 

0  Ou  2  l 40o 

O/LL  Co  MC  L  P (  I  ) 

00022500 

kRITE  (6,2uJj>)  PT  YPfc  (l  ) ,  (P.\AhE(  J,  1 )  ,  J*  1 ,2  ) 

00022  6uo 

CCNT  INUE 

00022  /OO 

IF  ( FNV.GE.O.ANO.PNV.LE.O I  GC  TC  94 

00022600 

CPECk  FuR  iNJKBtR  uF  VERTICES 

U  Ou  22 900 

MUTE  (o,*020)  P  N  V  t  (  PN  aM  E  (  0 »  1  ) »  J*  1 »  2  ) 

000230UU 

IF  (FNV.LT. 3)  PN  V  =  3 

00023100 

IF  (PNV.CT.6)  P.NV-6 

0OG232OU 

TPt  AbOVE  Twu  STATEMENTS  PAY 

APPLAk 

00^23  JUO 

AS  PuCCING.  IN  P^LT,  TnEY  ARE 

ME  AnT 

00023400 

TG  L E  UcbO'oOINo  AIDS* 

00023500 

J CPiK  •=  J LHk+  1 

00023  ouO 

CCNT  INUE 

00023700 

IF  (  PNV  . L  T  .  4  )  CG  To  98 

0  0023 SUU 

ChECK  IF  THE  VERTICES  ARE  CGLiNEAR 

0  uj 23  900 
00024000 
0  00  2  4  1 0  u 
00024200 

I  1  = 

V-J 

12  = 

PNV-2 

0  00  24  300 

1  3  = 

PmV-1 

0  Ou  244U0 
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o  o  r  o  r>  o  o  o 


DC  9 5  J  1=1, I  1 
CO  95  J 2=2 , 12 
DC  95  J3= 1 , 1 J 
DC  95  J4=4,PNV 

IF  ( J9.LE.J3.CH.J3.LE  •J2.Ok.J2.UE.Jl)  GC  TC  95 
C  =  CbMJTA (PX ( Jl ) , PY( J1 ) t P2 (J  1) ,  1.0tPX<J2  )#P  Y<  J2 ) tP2( J2)  * 
1  1  .OtPX(jJ)  *  PYIJ3)  »  F2<J3)  t  1«C»PX(J4)  ,PY<J4)  »FZ(J*«)  »l-0) 

IF  <  A6SIC) .LE.0.10)  GC  TC  95 
C  AL  L  cBMcCPI  l  ) 

wRl Tt  (o, 2027)  <  FKAME (J •  1  )• J*l»  2 ) • Jl«  J2«  J3« J4.D 
95  cCNTINJE 
9  t  0  CN  T  I  Nj  E 

FNVRT  U  )  =  PNV 


TRANSLATE  COORDINATES  TC  SKP  SYSTEM  AND 
wNITE  TO  DATA  oASt  IF  NC  ERRORS 

DC  ICO  J  =  1 , P N V 

CALL  L6MfiMPX(j),HY(j)tPZU)tP>Y2(iiJ»l  )  fbc  SX y2 , 

1  IX  l* 1 Y 1 , 12 1 t I X2, 1Y2 , 122) 

100  CCM  l.MJc 

cALL  Lo^lCP ( PNV  ♦ 1 ) 

wRITE  (0,10  0  3)  PNCtl  )♦  (PKAMElJt  I  ),J=1,2),PTYPE(1  )  »  PNV  » 

1  (P>  (J)  ,PY(J  )  , P  2 ( J )  ,  (PXY2(K,J,  1  )  *  K  —  1  ,3)  *J=i,PNS  )  * 

i f  (JCHK.EC.C) 

1  WRITE  (  1  1  102  +  1  )  PNO  (I  )  t  (  PIS  Ai4  E  ( J  *  1  I « J* 1  •  2 )  •  M YPE  <1  ) » 

2  PNV  ,(  (PXY2(K*J,1  )  ,K=1 « 3 ) t  J* It PNV) 
ILL  cLNTINJE 

FNU  L  f  LuLH  FOR  THE  PANEL  C*TA 


RE  AC  AuC  PRuC  l.  OS  COORDINATE  CATA  F  CK  CONTROLS 


CALL  CdMCCP(l) 

WRITE  (o  ,  1  C  1 2 ) 

00  1 5  C  1*1 9  NCTL  S 
A  EA  C  (5  ,  lOGt  9  tND=72s,  ) 

(CN/ PEI J  ,  1  ) , J=  1,2  )  , LT YPf (  1  )  ,CPNL(  1 ) ,CPT  (  1  »  ,01  ,02,C3 
1 F  ( CPNL ( 1  ) . NE  «U )  GO  TO  1 15 

NE.O  =  =  >  CE  F  IN  ED  kELATIVE  TC  A  PANEL 
IF  (CPT  (1  )  .t..C)  GC  To  13  5 

FC.O  ==>  DEFINED  IN  ABSCLCTE  CuGRO 
*  R I T  t  ( o  ,  20  1 3 )  (CNA^t< J,  I  ),J  =  1,2) 

EKRCK  IN  CEF1NITJCN  LF  CGCJKl  SYSlLM 

JCHK  =  JCFrv+1 
GC  TC  117 
CCNT  INJE 

DL  lit  1PM*1,NPNLS 
If  (  PNO  (  1  F\L  )  «  E  0  •  CPNL  (  1  )  )  GO  10  12G 

OHECK  IF  D  EF I  NEC  PANEL  EXISTS 

CoN  T IN Jt 
CALL  C^rtCLP(l) 

wRITE  (  o  ,  2002  )  CPiNL  (  l  )  9  (CNAMt  (J  9 1  )  9  J*1 92) 

DEFINED  PA  gt L  DCES  NOT  EXIST 

J  LHn  =  J  C  F »s  ♦ 1 
CCNT  INJE 
CPNL  (I)  =  0 
C  FT  (  I  )  =  C 
GC  TC  135 
CCNT  [  NJ  £ 

IF  (  CPT  (  I  ) .GL . 1. ANC.CPT (  I  )  *0E  .PNVRT (  IPNL i  )  Go  TO  12C 

LhEC*  IF  DEFINED  VERTEX  EXISTS 


1  15 


1  16 


1  1  7 


120 


00024500 
0  002  4  600 
00024700 
C00248G0 
0  C02h‘?0o 
0  00  25  00 J 
00025  ICO 
0002520U 
OOo  25  300 
o 00  2  5  400 
0  002  5  5oO 
0  00 2  5  c  cO 
00025700 
0  002  5  8o0 
0002p9UU 
0  O0  2o  COO 
00026  luO 
0  00  2o  20  0 
0  00  2c  30u 
00026 auj 
OOu  26  500 
0  002c  600 
0  00  2c>  7ou 
0  00  2o  bOO 
0QG269UG 
0  00  2  7  Ouo 
00027 100 
0UC272U0 
00027  3u0 
0u027  40u 
0 Oo 27  5uU 
0  00  2  7  60u 
Gu027  700 
0  0U27 b Go 
0  002  7  5  u  0 
0  002b  000 
0  0c 2  b  10 0 
0002b200 
00u2b3o0 
000  2o  4u0 
0002  8  50U 
0  uO  2  bouO 
0002c  7oO 
0  002  6  bOo 

0002bSUU 
00029000 
OoO  29  100 
000292UU 
0002930U 
0o029  400 
0UU2V5OO 
00029CUU 
0  0029  70«j 
00629800 
00029900 
OCu  3UOU0 
000  30 10U 
00030200 
QC03G  300 
UuO  304UU 
0  00  3 u  500 
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C4LL  CdMCCP( I ) 

WRITE  (6,2003) 

C 

C  FT  {  I  )  =  1 
JLbis  =  JCHK+1 
I  30  CONTINUE 

IF  (C3.EC.0.0) 

c 

CALL  CbMCCPlI) 
nRITE  (6,20 Os) 

CFM(I)  =  0 
C  FT  (  I  )  =  0 
JChK  -  JCnK+1 
GC  TC  135 
lii  ccntinje 

CXY l (4, i J  =  Cl 

OYZ  (5«  n  =  c z 

C  COM PUT  P  A  BbCLUT  E  COORDINATES  F  R  C  N  RELATIVE  COORDINATE 

I  C  =  CPT  (I  ) 

Ifc  *  Iu-I 
I  A  -  Iu  + 1 

IF  {  )A. tC.PhVRTI  IPNL  )+I)  IA=l 
iF  (le.EC.O)  I  b=PNVRT {  IPNL ) 

C>  =  SwkT ( (FXY2( lt It, IPNLI-PXYZC It )0« IPNL ))**2+ 

1  (  P  X  Y  Z  (  2 »  ID,  IPNL  )  —  P  X  Y  Z  (2,  10,  IPNL  )  )  *  *  2  ♦ 

2  { PXYZ(  3  ,  IE, IpNL  )-PXYZ  (3, 10 , IPNL ) )**2 ) 
u,Y  =  S'wRT  (  (PXYZ(  I  ,  IA,  IPNL  J-FXYZ  {  1,  I  J,  IPNL  ))**2+ 

1  (  P  X  Y  Z  (  2  »  I  A  ,  I  Pl-L  J-PXYZ (2, )G, IPNL  ))**2  + 

2  ( PXYZ<3, 2  A* IPNL  J-PXYZ  (3, I u  ,  IPNL  )  )**2  ) 

T  1  =  AoS  (  Cl ) /CX 

T  2  =  AdS ( C2  J /CY 
T  i  *  I. 0-7 I-T  2 
CC  13A  J=1 » i 

CXYZ(Jtl)  =  T  1*PXYZ (J, I t, IPNL)  *  T 2 *P X Y Z  ( J ,  I  A ,  I P N L )  ♦ 
I  T3*PXW(J,  I  C  « I P NL  ) 

134  CunT  INU  6 
GC  TC  1  A  2 

135  CONTINUE 
I  FNL  =  0 

CXYZ  ( *t  *  I  J  =  0.0 
CXYZ  (3,1)  =  u.O 

C  TRANSLATE  COORDINATES  TC  SRP  SYSTEM 


CPT  (II,  (CNAKE< J,  I  )  ,  J=  1 , 2  ) 

DEFINED  VERTEX  DOES  nct  EXIST 


GG  TO  131 

FLR  RELATIVE  LtFN.  Z  CCGRD  IS  0.0 


(CNAMEtJ, 1  ) » J  =  1 »  2 ) 


CALL  Cb  H  T  K1Y (CltC2,C3,CXYZ(l,I),BCSXYZ(I),lXl,IYl,IZl» 

1  1X2, I Y2, IZ2) 

1  A  2  GCM  I  Nut 

IF  {  I  .Ec,  I  J  Go  TG  145 

K  =  1-1 

GC  1  A  I  J*  I  §  K 

IF  (CnAPEI I , J) . tC.CNARfc (  1, I ) .ANC.CNAME (2  ,  J)  . EG. C NAME (2 ,1 ) J 
1  Gb  Tl  14  6 

C  ChECN  IF  CcNTHuL  NAME  IS  CNICUt 

141  CCNTINJE 
GC  TC  145 
1 46  C  L  NT  I  N J  c 

cZll  CoMCCP(l) 

wFITE  (6,2020  (  L  N  AM  f  {  K  ,  I)  ,  K  =  1 , 2  ) 

C  bUPLICATt  CGNTRCL  NA^It 


0  003u  600 
00030700 

0003060b 

00u3u9b0 
00031  000 
00031 lOu 
00031200 
00031  3  uu 
00031 400 
00031 500 
00031 bCu 
0  0u3 1 700 
00031 8b  0 
00031600 
0003200V 
0 0032  lOu 
00032200 
000  32  Job 
0UO32 400 
0003250o 
00032600 
00032  700 
00032600 
00032900 
00033000 
bO 033100 
OOu  33  2bO 
0  00  3  3  30u 
0  uO 3  J 400 
0  OG  3  3  500 
0  00  33  oOO 
000  33  70 j 
000  33  60 ^ 
00033900 
0  00  34000 
00034  100 
0  u034  200 
0  00  3**  300 
0  00  34  40 J 
OOU  34  50b 
0  00  34oOU 
00034  7uu 
0  Ob  34  600 
00034900 
0003500b 
00035  loo 
0  0035  200 
0 b J  35  300 
00035400 
bOO  35  5U0 
UO0356U0 
00u35  700 
0  003 5  COO 
0 00  35  900 
0  CO  3bbOO 
0003610 0 
00036200 
0 0036300 
0  00  36400 
0  CO  36  50 J 
0  bU  36  6u0 
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JCHK  =  JCFK+1 
145  C  C  N  T  I  Ml  E 

1  NAM  6 ( 1  )  =  eLANk 
I  NAM  E ( 2 )  =  BLANK 
IF  (  1PNL.EL.0J  GO  TO  147 

C  CHECK  IF  CONTROL  DEFINED  ABSOLUTELY 

INAME(1  J  =  P  N  AME (  1.1PNL  J 
1  NAME (2  )  =  P  N  AN  E  (  2  ,  I PNL ) 

147  CONTINUE 

l  ALL  Cb  MCCP (  1 ) 
nFlTc  <  6,1005) 

1  l CN AME ( J , 1 )*J*1*2)*CTYPE(  1), INANE, CFT(  i),Cl,C2*C3» 

2  ( CnYZ ( Ji 1) , J=l,5) 

N  =  ID2+NFNLS+I 

IF  (JCHK. EL. C) 

1  WHITE  (  I  *  K  )  (CNAKE(J,1),  J=1  t2J  tCTrPK  D.CPNLU  J, 

2  C  PT  <  1  )  ,  (CXYZ( J,  i  )  * J=  1  *5  ) 

1  50  v.CNl  1NJE 

ENL  LF  L 4 CP  TC  PRuCESS  CONTROL  DATA 

*RITL  J 1REUCRY  BLOCK  FOR  ACC  FLNCUCN 

IF  ( JCHn)  IB  J ,  ItO,  17C 
1 60  C  C  NT 1NJE 

*  r IT  G  (1'lLCt)  NAME* I  03 , 104,NPNLS,NCTLS»fcCS>YZ,IX» 1 Y  * I  Z 
I  C 2  -  104 

HE  (1*1)  JWKSP  ,  1  I  1  *  I  12  ,  I  Cl  *  ID2  *M.AX 
*RITE  (6 , 2  C2S  )  NAKEtNFNLStNClLS 
GO  TO  10 

READ  NEXT  COMMAND  CARD 

1 7  C  CONTINUE 

aRITE  (6,<C29)  NAMEioCHk 

MEMBER  not  ACCEC  uLE  TC  EkRCFS 

GC  TO  10 

REAL  neat  COMMAND  CARD 

PkINT  MEMBER  name  AND  NUMBER  cf  errors 
fok  uHLCk  function 

1  90  C  C NT  I  Nub 

JCFK  =  JChK+2  147483647 
v.kITE  (u,203u)  NAME.OCHk 
GC  TC  10 

READ  NEaT  COMMANu  CARO 


DELETE  A  member  FROM  CAT  A  BASE 


20 0  0  C  NT  I  NUE 

CALL  CEMCCP(O) 

v*  R  I  T  E  (utlCOl)  liJPR*NAMc 

IF  ( NAME (  1  )  .NE. EL ANK.OR  .NAME ( 2 )  .NE.dLANK )  uC  TC  21C 
C  CHECK  IF  NAME  IS  BLANK 

WRITE  ( o  ,  2  COO  )  iuPF 

C  DELETE  IGNGKEC 

GC  TO  U 

C  It  AO  NEXT  COMMAND  CAkC 

2  10  CONTINUE 

aEAO  (  l*  i  ,cRR=ClU)  J*KSP,  I  11,  112  ,  101  ,  10 2, MAX 
IF  (JWhSP.NE.IkkSP)  CC  TC  E1C 
C  Ol-ECK  FuR  VALID  CATA  JASl 


00036700 
00036800 
0  003o  9Cu 
000  37  COO 
00037 1 uO 
00037200 
0  003  7  30  j 
000374UU 
0  00  37  50u 
0003 7600 
0  00  37  7uu 
0UU37  bOO 
G00375UJ 
0  00  3b  luU 
00038100 
000  3S2oO 
000  3b  30u 
0003o4G J 
00030500 
0  00  3  b  60  u 
0 00 3o  7 0 U 
000  36  ECO 
0003d  400 
0  Cl  34  UGu 
0  00  35  loO 
0  DO  39  20u 
00U35  3cO 
0 00  39  400 
0  00  39  5uO 
0  00  35  oC J 
00039700 
0003V80J 
0  0039  5uu 
0G04OU0O 
000 4u I  G~ 
00040200 
00040300 
0  00  40  400 
G0o40  5G0 
000  40  600 
000  40  7Cu 
00040 800 
00040900 
0  LO  41  00  fJ 
00041  I  Go 
00041 200 
00041  3b  J 
00041 400 
0  00  4 1  50o 
C0041 COO 
0  GOh 1 700 
00041 800 
0  uo  4  I 9u J 
U00420G0 
00042 lLO 
0U042200 
00042300 
00042  400 
00J4250O 
OOU42  600 
00042  7ou 
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C 

C 

220 


C 

C 

2  3  C 


C 


C 


0C  22  C  1=111,112 

KEAO  (1  1  1  ,EKR  =  850  )  1  NA  M  E  ,  103  ,  1 0  4 ,  1 P  N  LS  ,  1C  71 S  ,  CR  1 G 1  N ,  1  X,  1  Y  ,  1 L 

R  E  AO  C 1R  ECTOR Y  BLOCKS 

IF  ( NAM  E ( 1) .EC*INAME( 1 ) .AND*NAME(2) *EQ*INAME( 2) )  GC  TO  230 

CHECK  FOR  MEMBER  NAME 

COM  1  MJE 

WRITE  ( O  »  2 C Jc  )  NAME 


GC  TC  10 


MEMBER  NAME  COES  NCT  EXIST 


R  E AO  NEXT  COMMAND  CARC 


C  0  NT INCE 

wkiTE  ( o , 1007  )  NAME 

MEMBER  NAME  E>1STS 

IC5  =  C 

aRITE  (I'D  uLANK, dL«NK,  (  IC5,  J=1  ,  10) 

DELETE  MEMoER  NAME  FkC M  OlkECTOkY 


GC  TC  1U 


KEAO  NEXT  COMMAND  CAkC 


initialize  data  base 


2  5 C  UM  INUE 

l  £  LL  CbMCCP(O) 
wRITE  ( o  1 1 00 1 )  I  OP  R 
^  R  I  T  E  (u.lCCt) 

wRlTt  (l'l)  1V.KSP*  INTC.MAXREC 

RR1TE  FIRST  RECCRO  CN  CATA  EASE 

III  =  INTC  (  1) 

112=  I N  T  C ( 2  ) 

J  =  0 

DC  26:  1=111,112 

260  write  (i*n  Blank,  Blank.  (j,k-i,  ic> 

ENTER  ELANKS  PC R  MEMuCR  NAMES 

GC  TC  10 

READ  NEXT  COMMAND  CAKC 


PRINT  t  K  t  R  STAT1CN  DATA  eASE  -  IP  INPUT  MEMBER  NAME 
DCES  NCT  EXIST,  THE  01RECTCRY  IS  PRINTEC 

3  0  C  CUNT  I  NOE 

CALL  CBMCCP(O) 

NKITE  ( 6 , 1 0  J 1  )  iu  PR  ,  N  AME 

Rt AD  (l'l, ERk  =  b  lu  )  jwKSP,  III,  112 *101*102, MAX 
C  READ  FEACER  RECCRO  CF  DATA  BASE 

IF  (  JwKSP.  NE.  1V.KSP)  GC  TL  £10 
C  CHECK  FOR  VALID  CATA  BASE 

IF  ( NAME (  1 )  .hC. LLANK, ANO. NAME  ( 2) * EO. BLANK )  GO  TC  36C 
C  ChEcK  IF  INPUT  NAME  IS  BLANK 

DC  3 1 C  1=111,112 

KEAO  (l'l,  LKR=330 )  1  NAME ,  Iu3  ,  IG4,NPNlS,NCTlS,CR1GIN,  IX,  1Y,1Z 

C  READ  DIRECTORY  CLOCKS 

iF  ( NAME (  1) •LO.INAMb( 1 )  . AND . NAM E < 2). LG.INAME ( 2  I >  GC  TG  320 
C  CHECK  IF  MEMBER  NAME  EXISTS 

310  L  CN  T  1 NJ  E 
GC  TC  35  C 

C  MEMBER  N  AM  c  CCES  NCT  TALLY 

320  C  L  NT  1  NuE 

I  u  5  =  Iu3-*NP»\L  S-l 
CALL  CBMULPU) 


00042800 
0  0042 SCu 
0  CO  4  3  CL’ 0 
0  0043  100 
00043200 
00043300 
00u4340U 
000435OO 
0  uu  43600 
00043700 
00C4380L 
00043900 
O0G44  OOu 
0  004*4  1  00 
0  GO  44  200 
0  Oo  *#4  300 
U004*t  400 
00044  50u 
U  OU  44  cGu 
00044700 
00044  feUO 
0  0044  900 
000450GC 
0  00  45  luu 
00045200 
0  0045  3C’u 
000454U0 
00045500 
O0045  6oU 
0UO4p  70u 
00043800 
00045  Sou 
0  CC  4o COO 
0004o IOC 
0O0462C0 
0004^300 
00G464C0 
0 Ou 46  500 
0  U04oo0C 
00046700 
0  Ou  4 6  8 U^ 
0  004o  SOO 
0  GO  47  OCO 
0  OU  47 1 CU 
00047200 
000^7300 
000  ^7  4uu 
0 UO 4  7  50o 
0004760G 
U0u47  700 
0004  7  bOU 
00047900 
0  CO  48  COu 
0  0048 100 
00046200 
00048300 
OOU  4b 400 
0004b  500 
OOCtbfcuO 
0004b  7CU 
0  0048  buO 
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c 


c 


c 

c 


c 


c 


c 

c 

C 

c 

c 


*  R  IT  E  (c.  ,  IC  1 1  )  1,INAME,IC3,ID4,NPNLS,NC7LS,0KICIN,I*,IY,IZ 

PRINT  DIRECTORY  INFC  F  CR  MEMBER 

DC  33C  I  =  I C3 ,  ID5 
k  *  1-1 03+1 

READ  C 1  •  i  y  ERR=-8SQ  )  PNO (K ) , ( PN AM E ( J, K I , J= 1 , 2)  ,  F  T  YP  E  ( K  i  ,  P  N  V  , 
i  (  (FXYj.  (LtJt  K)vL*l«2)vJ*I«PNV) 

PNVkT(K)  *  PNV 
CALL  CBRCOHt FNV  + I ) 

*RITE  (o.IDJS)  PNC ( K ) ,  ( PN AME ( J  »  K  )  »  J  =  1*2)*  PTYPE(K) »  PNV » 

I  ( (PXYZ(L*J*K)»L=i»3)*J-I*PNV) 

rRiTE  PANEL  DATA 

3  30  COM  I  NUE 

«R1TE  (6,ICL0) 

I  o5  =  1054  1 

DC  340  I*  IC5»  IC4 

READ  (  i  *  a  *  E»\«*b30  )  1NAME,JTYP,IPNL,1P1,L1,C2,C3,C4,C5 
IF  (  IFNL.EC.O)  uC  TO  334 
DC  333  J  ItNPNLS 
IF  (  IF NL.tw.PNCI J ) )  GO  TC  335 
3  33  C  CN  T  I  NU  E 

334  CCNT1NJE 

NAME ( I )  =  CLANK 

NAME  ( ^ )  =  ELANK 

GC  TC  337 

335  C  C NT  I NU  E 

NAME  I  I )  -  PNaME( I ♦ J) 

N  A  K  c  (  2 )  =  P  K  A  M  E  (  2  ,  J  ) 

33  7  L  CN  T  I  NU  t 

CALL  Co M Cl P ( 1 ) 

cRl  T  E  (6  •  IDOL  )  INaME, jTVP , NAME , 1PT ,C i,C2,C3,C4,C5 

r,  R  1 1  6  DATA  FOR  CONTROLS 

3  40  CENT  I  NOE 
GC  TO  10 

rfcAD  NEXT  cUMMANC  CARD 

350  COM  I  N^L 

CALL  CtMCCPU) 
hRITE  ( o  *  2  0u6 )  NAME 

PhINT  -  MEMBER  NCT  FOLND 

3  6  C  CcM  INOE 

DC  3/C  1  -  I  I  1 1 i  I  2 

K  E AO  ( 1  1  I  t  ERR- 85  o )  1NAME  ,  ID3, 104  fNPNLS,NC  US  tCKIGI  N,  IX,  I  Y  ,  12 
IF  (  INAME ( i> .Ew.uLANK.ANC. 1NAME (2 )♦ EC *tlANK)  GC  TC  370 
cALL  CbMCDPI  I  ) 

"FITE  (otlJAi)  I , INAME  t 10  3, 1 C4,NPNLS,NCTL$,0kIGIN, IX, IY  , 12 

PRINT  DIRECTORY  oLCCKS 

3  7  C  CCM1NUE 
GC  TC  10 

F  E  A  D  NEXT  COMMAND  Caro 


Comp  C  R  t  .*  STATION  DATA  ScT  -  IF  I N  F  0  T  McMcER  NAME 
IS  cLANn,  JJMF  THE  tMIRE  OAlA  eASt 


4  0  C  C  C NT  I  NoE 

CALL  CdMCLPCO) 

n;<ITc  ({>,1C01)  I JP* ,  N  AMc 

IF  (NAME (  1  )  .3E • fcLANK.OR .NAME ( 2 ) .NE. BLANK )  GC  1C  42C 
C  L  h  ECn  IF  INPUT  NA^E  IS  BLANK 

DO  4 1 C  I  *  I  »  M AXR  EC 
READ  (I  1  I  )  ICJMP 
CALL  CjMClPO) 


0004690J 
U0U49  uGO 
00049  100 
00049200 
000 49300 
00049400 
00049  5uU 
0  00  49  oGU 
0o04970J 
0  u049  fcu 0 
00049900 
000  50 Guo 
000  50  luO 
0  00  5020u 
OuG  5 G  30  c 
0  Ou  5o4u  0 
000  5 J  50o 
uOO  50  6lu 
00U507UJ 
0 l/o  50  BOO 
000  5 J  90 J 
00051000 
00051 100 
00051200 
OOU  5 1 3o0 
0005140 0 
00051 5c0 
0UU51 6G0 
0  uu  5 1 700 
00051  Ego 
00051 SuU 
0  00  52  CO J 
U  00  5t  1  Ou 
00052200 
00052300 
0  00 52  4  uO 
00052500 
00052  6G0 
00052  7tO 
00052  EGO 
00c 52  SCO 
0 00  5  3  CGu 
OuO 53  lu J 
0 00  p3  2G0 
0  0053300 
0  00  53  4u0 
0  UU  ^3  3u0 
0  00  53  tGu 
UOo  53  7uo 
0 00  53  EGO 
0G0539GU 
0  CO  54  OOU 
000  54  ICO 
00054200 
0  00  54  3o  J 
OGG 54400 
000545GU 
0  00  54  cO  0 
000  54  7C0 
00054800 

00054900 
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n  o  o  o  o 


41  C 
C 

C 

420 


C 


c 

4  3  C 


C 

c 

*+4  0 


C 


c 

450 


h  R 1 T  E  ( 6,1013) 
C  C  NT  1  N  JE 

GC  TC  10 


1 , i GUMP , I DLMp 

DLMP  DATA  BASE  IF  INPL7  IS  BLANK 
READ  NEXT  COMMAND  CARD 


C  C  M  INUE 

RE  AD  ( 1 1  1 , ERR* S  10  )  JWKSP t 1  11 ,  1 1  2  »  I  Cl t 1C2 , MAX 
IF  ( JKKSP.NE. IhKSP)  GO  TO  £10 

ChECK  FuR  VALIC  CkE*  STATION 


DC  43 C  1  =  111,112 

RE AO  (1*1,  EkR=  350 )  INAKE,  1 C3 ,104, NPNLStNCTLS, ORIGIN, IX,  1Y,U 
IF  ( 1 NaM  E ( 1 ) . EC • N  AME ( 1 ) .  AND .  1  NAM  E ( 2 ) .EC. NAME ( 2 ) )  GC  TG  440 

CHECK  DIRECTORY  FOR  MEMEdER  N A  RE 


CCNT  INUE 

wkITt  (6 , 2C06 )  NAME 

GC  TC  10 

CENT INuE 
CALL  CfiKCCP(l) 

*  R  IT  E  (o ,  1 C  1 1 )  III  NAME 


MEMdER  NAME  CCES  NCT  EXIST 
READ  NEXT  COMMAND  CARD 

ID3,I04tNlPNLSfNCTLS,CkIClN,lX,IY,lZ 
PRINT  DIRECTORY  INFC  CP  MEMBER 


JC  4  5 C  I  =  I  C3  *  1 C 4 
READ  (1  '  1)  I  DUMP 
lALL  Co  m  C  C  P ( 3 ) 

aP  ITE  (6,1013)  I ,  1 LoMP , 1  GUMP 

DUMP  MEMBER  DATA 

CCNT  I  NLE 
GC  TC  10 

READ  NEXT  COiMMANC  CARD 


PJNCh  CkEa  STaTION  UaTA  EASE  MEMcER 


5  0  C  CONTINUE 

CALL  CEKLCP(J) 

V^PslTE  (6,  1001)  1JPR,NaMF 

rsEAG  1 1  •  1  •  E  RK*  6  1 J  )  J^.KSP,  I  II,  112  ,1C1  ,  102, MAX 
IF  (  J  k  KS  P  •  NE  .  UKSP)  GC  TO  610 
C  ChECK  FuR  VALID  DATA  lASE 

IF  (  NAME  (  1  )  .cu  .  CLANK. mNC.  NAME  (  2  ).  ED.  CLANK  )  CL.  TC  56C 
C  ChEUK  IF  INPUT  MEMBER  NAME  IS  BLANK 

l)L  5  i  C  1*111,112 

*EAD  ( 1  *  I  ,  ERR*  85  0  )  I  NAM  L  ,  ID  J  ,  ID  4  ,NPNL  S  ,  NC  T  LS  ,  CK  1G 1  N  ,  1  X  ,  I  Y  ,  1Z 
IF  ( NAM E (1 ) . EC. INAMt ( 1  )  . AND. NAME ( 2 )  . EG . 1NAME ( 2 )  )  UC  TC  52C 
C  ChECK  IF  NAMtS  TALLY 

5  1  C  C  C  FT  I  NLt 

«MTE  ( 6 • 2  OOu )  NAME 

C  NAMES  00  NCT  TALLY 

GC  TC  10 

C  R  E  A  C  Thfc  NEXT  OCMMAND  CARD 

•32  0  U  C  NT  INUE 

105  =  IJ3+NPNLS-1 
^  R  1 1  E  (7,1014)  NA  M E  ,  N  PN L  S  ,  N C  T  L S 
DC  5  3 C  I  =  I  Co , i D  5 

READ  (1  *  I  ,  cKN  =  do  J  )  I  NO  ,  1 1\  AK  L  ,  J  T  Y  P  ,  I  N  V  , 

1  (  P A ( J )  »PY  ( J  )  , P  Z (  J  )  , J- 1 ,  I N  V ) 

C  READ  PANEL  DATA  FRCM  DATA  BASt 

JC  1 >?6  J  =  i  *  I N V 
IPX  (  J )  =  11  IX(PX( J)*luu.C) 

I  PY  (  J)  IhlA(PY(J)*100.C) 


000  55  COO 
00055 10G 
00055200 
00G553G0 
00055400 
00055500 
U  00  5  5  o  0  U 
00055700 
0 UJ  5  5  bOG 
0 00 55  SOu 
OG056CGO 
00056 luu 
00056200 
GOO  5o  30 j 
0005G4GO 
0005o50'J 
QuG  5o  600 
0  OC  5u  7UC 
0G0  5680C 
U  00  5o  SOO 
00057000 
00057 1 GG 
00G572UU 
000573CG 
00057400 
OOG  57  5o0 
G00576GJ 
00057700 
00057600 
00J5750J 
00058000 
000  5o 100 
0005620U 
00058300 
OOu  534  GO 
0005c  5uO 
000  5c  600 
00058700 
0  Ou  53  800 
000  58  400 
0  0055  OOU 
00059  100 
00055  2uO 
00059300 
00039400 
0  00  59  5uu 
0005360U 
OOU  59  7Cu 
000  59  8uU 
OOu  59  9u0 
0  00  60  OCO 
OOU  6U 1  GO 
00060200 
00C6U3G0 
00060400 
0  00 6 u 500 
0  uO  60 600 
0006070U 
0006080U 
000  60  5ou 
0C061 OUO 
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nooc-oonoo 


IPZIJ)  =  l  F  I  X  (  P  Z  (  J  )  *  100  •  0  ) 

C  CONVERT  CATA  T  Li  INTEGER  FOR  PAT 

528  CONTINUE 

WRITE  l 7  » 1 0 1 5  J  INQ, 1NAME, JTYP,INV, 

1  (  I PX ( J ) ,  IPY ( J  )  ,  IPZ ( J  )  ,J=1 ,  1NV  ) 

C  PUNCH  PANEL  DATA 

53b  CbNTIMjE 

I L  5  =  I03+NPNLS 
DC  5 A  C  1  *  I  C5  »  IL4 

REAO  (  1  '  I  , E  KK=  88  0  )  INAME,  JTYP,  IPNL  ,  1  PT  ,C1  ,C2  t C3  »C4  ,C5 
C  R  E  AO  LATA  FOR  CCNTRCIS 

IE  (  1PM.EC.0J  GO  TC  535 

C  ChECK  IF  OATA  IS  AbSuLOTE 

I  L4  =  IFIX  (L4*  IJO.C) 
i  C5  =  I F  I X ( U5* 100 • 0 ) 

*  FITE  (  7  -»  101c)  1NAME, JTYP, IPNL.  1PT,  IL4f IC5 
G  C  I  C  5  a  C 
S3  5  CCNTINUE 

I  Cl  *  I  F  IX  (clMOC.C) 
i  C2  *  1 F  1X(C2* 100.0) 

IC3  =  I F  IX ( C3* 10  0.0 ) 

^  F  I  T  t  (7,1017)  iNAPttJTYPf i  PNL  » I PT , 1C1»1C2«1L3 
540  CCM  I  NUE 

w  K  I T  E  (  C  ,  2  C2  1  )  NAME 

C  EK  INT  PUNCH  MESSAGE 

GC  TC  10 

C  REAL  NEaT  COMMAND  CARD 

5  o  0  GCivT  I  NUL 

hkll  c  l  o  *  2 Co5  )  ICPR 

C  PRINT  -  N C  N  A  RE  GIVEN 

GL  TC  10 

READ  NEXT  COM  KAN  L  CARD 


CCM  PR  E  So  CREW  STATiCN  DATABASE  FlNClICN 
I.  GCE  $  THkCUGH  MEMBER  LIST  TC  LuCATt  LukEP  MC$T  FtMbtR 
t.  CHECKS  IF  TtiE  MEMBER  HAS  LEFT  A  GAP 
3.  IF  rES,  REWRITE  MEMBER  CLOSING  TFE  GAP 

CEL £TE  MEMBER  FROM  MEMBER  LIST  AND  GO  TC  1 


oOC  CCM  INOE 

bALL  CBMCCP ( 0 ) 

WRITE  (bvlCCl)  IUPR»NAMF. 

R  t  AM  ( 1  *  1  .ERR* 810  J  JwkSP*  III*  I  12 , 1 L  1  »  102  ,M AX 
IF  (  Jr,KiP.NE.  Ir,NSP)  GO  Tf  E10 

C  CHECK  FOR  VALIC  CRE*  STATICN 

I  cTM  =  101 
6  1  C  CCM  1NCE 

I  T  CP  *  1  C2 
I  1  =  C 

DC  b2C  I  *  111,  > 12 

C  LhJ  (  i  '  1  ,  EkR  =  650)  lNA^L  •  1L3,  104  ,NP.\lS,  NCI  LS  ,  ORIGIN,  1  X,  I  Y  ,  U 
IF  (lC3.GL.ITCP.CR.iL3.LT.lDTM  .CR. 

1  (  1NAME( i ) . Ew. bLANK.ANC. I  NAME  <  2 ) . EC.oL ANN )  J 

2  Gu  TC  o2C 
11*1 

IT  CP  =  I l  3 
b  2  C  bCM  1NJF 

IF  (  i  I  .EC .0)  CC  TG  66C 

READ  (  1  '  1  I  ,  Lk**65  3  )  1  NAMl  ,  ID  j  ,  10  4  ,NP  i\L  S  ,  Nb  1LS  ,  LK  1 G 1  N  ,  l  X  ,  1  Y  1 1Z 
IF  (  ITCP.EC.leTM)  CC  TG  64C 


0  OU  6 1  1CU 
00061 20U 
OOOfal 3u0 
000b 1 400 
00061 500 
0  Out  1 600 
OOObl 7GU 
00061  bGO 
00061400 
0  00b2  CGO 
00062 luu 
000o2200 
0  Ou  62  3  00 
0  DO  62  4u0 
OuG  62  500 
0  00  b2  6 CD 
0  Ou  62 7CU 
0  0062 8CU 
000o2  40U 
0  0063  COO 
00063 100 
UOU63  2uu 
00063300 
0  00o3  400 
G0Go3  500 
00063600 
0  00b 3  7t 0 
QU0b3  bOu 
00063400 
0  uu  64  GOU 
0 00  64  1  uO 
000  64  20u 
0  00  b^.  30C 
0  uO  64  4  UU 
OUu  o4  5C0 
0 00  o4  t  Cu 
U  0064  7uU 
0  00  64  60u 
0UUO4400 
0  Ou  65  CuU 
00065100 
00065200 
0006d3uG 
OOU654CO 
00065500 
0uu65oQ J 
00065  7uO 
000c58C0 
u  OU  6  5  4  0  U 
0  00  66  GOO 
0  Ou  66 1  CO 
00C6O200 
0  00  66  3 UO 
0  006b  400 
0  Ou  bo  5 Ob 
0  00 6660u 
0  OU  66 70U 
0 UU oo  bOu 
0 00 66  400 
0  CO  o7^0u 
0  uu  o  7  1 C  u 
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ono  onn  nor-  onoo 


K  =  103-1 
L  =  IETM-I 
J  =  NFNLS+NCTLS 
DC  63 C  I  =  I ♦ J 

kEaD.  (I  ■Ml«fcRR*b8-0)  1  CUM  P 
a  F  I  T  E  {  1  *L+ J  J  JOUMF 
630  CGMINLE 
103  =  l+l 
I  0  4  =  L  +  J 

WRITE  (i'll)  I  N  AM  E ,  I  C  3  »  1 04  ,  NPNL  S  ,  N’C  TL  S  #  CR I  G  IN  t  I  A  ,  I  Y  ,  I  Z 
l ALL  CriMCOP ( 1 ) 
wRITE  (6,^0221  INANE 
I 37M  =  I C4  +  1 
G  L  T  C  6 1  0 
64C  CONTINUE 

CALL  CO^CCPtl) 
wKlTE  (6 , 2C23 )  INAML 
I31H  =  104* 1 
GC  TC  tlu 
o  6  C  CCMINUE 

1 02  -  IbTM-1 

a  <  ITE  (1*1)  JWKSPtI  11,112,  I C  1  *  I C  2  *  M A  > 
w  R  I T  E  (b  ♦  2 032  ) 

GC  TC  10 

REAL'  NEXT  COM  MAN  C  CAN  0 


EM  uF  PROGRAM  MESSAGES 


7  00  UM  I  NlE 

CALL  Ccr1CCP(0I 
WRITE  (6,1001)  I LPR 
wRITE  ( 0  9  2  0  9  9'  J 
ST  LP 


END  OF  INPUT  GATA 


7  2  C  C  C  NT  I  ME 

WRITE  (6  »  2G15 ) 
w  k  I T  E  (6 , 2 C99  } 
S  T  CP 


OUPLICATL  MCNEER  NaME 


6  0  0  CONTINUE 

wRITt  (6  *  2 C  1  w  J  NAME 
Gc  T  C  10 


INVALID  Lf<  E  w  STATION  DATA  bA$6 


610  C 0 NT INUE 

wRITl  (o  »  2C3  1  ) 
wRlTt  (0,2099) 

ST  CP 

650  CONTINUE 

wRITE  ( 6  t  2  C 1  o  )  IAV1 

C  WRONG  INDEX  RECORD 

3  TCP 

6bC  C  C  M  INoE 

w R  I T t  (o  ,2017  i  i  A  V  1 

C  V  KCNG  CAT  a  REcCRO 

S  I  CP 


0 0067  20u 
0U0673U0 
0 JU6740G 
0  0067  5 Ou 
00067600 
00067700 
0  00  67  fcOO 
0 0067  9uG 
00068000 
0006b 100 
0006b  200 
000  68  30 J 
G00b64G0 
0  OU  6o  5l0 
0  0u66  600 
0 00 6b  700 
0 jO 68  bOO 
00066  9uu 
00069  OOu 
00060  ICO 
000  b9 200 
000693OO 
00069400 
G0U695uG 
0  00  o9  600 
00069700 
0  00t9  bOO 
0 J0o99uu 
u007uCCO 
0  00  70 1 00 
0  00  7G2uG 
000  7G3uu 
000  70 40 j 
OOU  70300 
0  00  70  60 0 
000  70  70 u 
00070800 
00070900 
0  00  7 1 OuO 
0  00  7 1  100 
OOC  71200 
00071  AGO 
OU0714GO 
00071 500 
000  71 600 
00071 700 
00071 800 
0  Ou  7 1 9u0 
0  GG  72  CuO 
000  72100 
00072200 
000  72300 
0007240C 
000  72500 
OOC  72 oGO 
0 DC  72  7Cu 
OOu  72  600 
0  Cj  72  900 
0  00  73  000 
000  /3 100 
0 00  7^  200 
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n  n  o 


FCRMAT  STATEMtNTS 


10  00  F0RMAT(A4,1X,2A4,214,3F0.2,1X,A1,1X,A1,1X.A1) 

1001  FORMAT  (9F  C3M1001  ,  A4  ,  IX  ,  24  4 , 2  1 4 . 3F  6 -2 . 1 X  ,  Al  ,  1 X  .  Al  ,  1  X  ,A  1) 

1002  FORMAT  (I  3.2A4 , 13,3X, I 1.9F6.2. 8X/  12F6.2.EX) 

1 0  C  3  FCFMAT  (1  15, 3M. )  ,2A4,7h,  T VP E * , 1 2 , lh , , I  2 , 2 O  VERTICES  — INPcI  00, 

a  4  OhCUKD  1  NATES -  —ABSOLUTE  CCGRDIN AT E S- / ( 4 6 X . 1 n < .3 F 7 . 2 

X  uH)  TC  (  » 3  F  7  - 2  » lh)  )  ) 

1004  FORMAT  (2  A4.  Uv  13,  i  1.3F6.2) 

100b  FORMAT (1 IX .2A4 , 15 . IX.2A4. 14.4F  (,3F7.2,6h)  TC  (,3F7.2,5h)  l  (, 

x  2  F  7  •  2»  lh  )  ) 

1 J 0 c  FORMAT (1 1X.2A4.15. IX  .2A4 , 13. 4h  (.3F7.2.5F)  (.2F7.2.1H)) 

1007  FORMAT ( 9  H  C B M 1 2 3 1  ,2*4, Sh  LELETEO.) 

100b  FCFMAT  (2  IF  CbM 1 24  1  iMTIALlZEC.) 

1009  FORMAT  (I  15, 3F.  )  ,2*4,7h,  T  YPE  =  ,  1  2  ,  1H  ,  ,  1  2 , 2  1 F  VERTICES  — AbSoLuIE 

X  1 2F  CL^PD IN AT  ES-/  (4bX,lP(,3F7.2,lh))  J 

1010  h  0  R ^  AT ( 1  0  X  .  51  P  CONTROL-  TYPE  1 N—  P  A  N  E  L  PClNT  — AbSCLLTE  COGKol NATE 


X  23PS-  KtLATIVL-oCCROlNATE/llX,e(  lh-  ),6P - tS(lH-), 

X  7  H - ,  2  3  (1  h-  )  ,  2  >  ,  1  9  (  1  h-  )  j 

IJ11  FORMAT (1  15 ,JP.  )  , 2 A4 , I Oh,  EX T E N T  =  ( ,  1 6 , 1 h , ,  I  6 , 2r )  , , I  4 , 8H  PANELS** 

X  1  »♦  ,  19M  CCnIkClS,  OR  1GIN*(  ,F7.2,lh,  ,F 7.2,lH, ,F 7.2, 7H) .  OKIE 

X  5  HN  T  .=  (  *Al,lP,*Al*iP,*Al,2P  ).  ) 

1012  FCRMAT  (lux  ,51h  CONTROL-  TYPE  IN  PANEL  PCINT - (NPL1  CC0R01NATES- 

X  511 -  — 4ESCLUTE  COORDINATES-  R E LA T 1 V E-CCCk 0] N A  1 tS / 1 1 X 

x  d(lh-).6H - «  d ( lh— ) , 7h - ,23( 1H-) *4X,23< 1M-) ,2X, 

X  1  9 ( lh-  )  ) 

1013  FORMAT  ( i  1  >  ,  ChREvOKC,  I5»3h*  =  +,22A4fJh4-=*/llX»bh*=«-,  12Z8oh*  =  +  /  11X, 

X  llZd  ,  3P*  =  +  ) 


1014  FORMAT  (5HJAC0  ,^A4,214,24r  O.C  O.C  C.C  FLO) 

1015  FORMAT (I 3,2A4,3X, 13, 1 1,9 16  .8X/12I t  *8 A ) 

10  It  FuPMAT ( 2  A  4 , I o ,  13,  Il»2It*42>*8>) 

1017  FORMAT (2A4, io.13. I  1 .3 It.3c>.  6> ) 

2  0  0  C  FORMAT  (9H  Cb'.lClA  ,  A*  ,  1  S  P-lNKNlwN  cPckATICN.) 

2  j  0  1  FCFMAT  (3JP  L&M27A  NO  SPACE*  CANNOT  ACC  *2A4,lh.) 

2002  FORMAT  (BH  CBM102A,  1 4,35h,  IMVmLIO  PANEL  NUMBER  FOR  CONTROL  ,2 A4 , 

X  lh.  ) 

2003  FCRMAT  (on  CtHlQ3Af14,3Cr,  INVALID  VERTEX  (MLMdEK  FCk  CONTROL  *2«4** 

>.  1  H  .  ) 

2004  FORMAT  ( 5  5  h  CaKlG^A  2  NOT  ZERL,  PANEL  Z  VtKTCX  Mr  ZERO  FOR  POINT 

a  *  2  A  4  *  1  h  •  ) 

2005  FCFMAT (^  4P  CbMlb5A  NO  NAME  GIVEN.  , A 4 , 1 Ch *  luNCRtb.) 

200 1  F  u  Hh  A  T  (9  H  Lo-nlocA  ,2A4,llh  NOT  FOUND.) 

2007  FORMAT  (5  4  h  CdM107A  NUMBER  OF  P AN t L S/ C CN T RO L S  INVALID  FOR  MtMLLk  , 
X  2 A4 . lh. ) 

200c  FORMAT  (sm  LPmIQBa  ,U*2oP  FCk  X  INVALID*  MEMBER  IS  ,2A4,1m.) 

2009  F  0  RM  a  T  (9  H  Cu<-i10Sa  ,Al,2oh  FOR  Y  INVALID,  MEMoER  IS  *2A4,  lh.  ) 

2010  FORMAT  ( 9H  CBMUCA  ,Al,26h  FbR  2  INVALlC,  MEMoER  IS  ,2A4,lh.) 

2011  FORMAT  (l+sh  00M11A  XLY,  aCZ  OK  YtZ  Ak  b  00L1NEAK  FOR  M£MdE*  ,^44) 

2012  FCRMAT  (39F  CdMll2A  OlKEoTORY  i  S  FOIL,  0  ANN  C  T  ACc  .244, In.) 

2013  FORMAT  ( 4  5  h  ^dMll^A  PaNEL  IS  ZERu,  BUT  PlIixT  IS  NOT  FOR  ,2tt4,ln.) 

2014  FuFMAT  0 Oil  114m  ,2A4,ltP  AOPtACY  EXISTS.) 

2015  FORMAT  (2  1  h  CbM  1  1 5  A  EN  D-uF  -  C  A  T  A  .  ) 

201c  FORMAT  (28h  0SM16A  1/0  ERROR  CN  R  ECOR  B ,  1 5 , 9P  (1N0EX).) 

2^17  FlknAT(^8F  CbM 1 1 7  A  I/O  CrKCR  ON  R ECOR 0* I  5 i 6h  (CATA).) 

2019  PGRMaT(17p  LJM1191  MEMbER,  ,244, 5P,  rAS,lA,6h  PANELS,  , 
l  4H  AND*  14,  IGF  CONTROLS./ 

X  odH  C  6  F  1201  OCL.kD  I  NATES  ARE  TRANSLATED  TL, 

a  2  h  (  .1-7.2.  1H..F7.2*  lh.  .F7.2.2HI./22F  Cd"1211  COORDINATES  G 

A  rtHiVCN  AS  ,  A  1 , 2H  ,  ,  A 1 , 5h  A  N  0  ,A1,21F  Akt  UL*  F,  L,  ANu  U.) 


OOU 73300 
Ouo  73  400 
00G7350U 
00073600 
0 0073700 
0  ^o  73  80u 
0 0073900 
,00074000 
000  7m  10  o 

000  7^200 
0y07430u 
000  7<,4Gu 
0  Oo  74  500 
OOw  74  <?0u 
0 00  74  70o 
,00074  800 
0  00  7a  SO  J 
,000  75  00  0 
00G75  100 
0  00  75  2oO 
0  00  75  300 
, OuO  75  4o0 
000  7 j  Sou 
,000  7 5 c 0 0 
,00075  700 
000  / 5600 
000  75  SO  -j 
0 00  76  COo 
0  00 7o lOo 
000  7c2G0 
0  00  7  6  3uu 
000  7 o **uO 
OOC  7o  500 
0  00  7c  1 0  v/ 
000  7o 700 
0  00  7c  600 
00076900 
0  00  7  7  GoU 
OOG  77 1 oO 
OOC  7  7  20u 
OOC  7  73GD 
00077400 
U  Ou  77  5 C u 
000  77 600 
0  00  7  7  7uO 
G  00  7 7  oOO 
00077900 
0  CG  7 o  Oo 0 
000 7 c  lou 
uCO  7o  20u 
0 CL  7b  Jo U 
OOL  76  4  0  0 
0 uu 7c  5G0 
OOl  7b 60u 
UO 07c  700 
OuC  7b  800 
000  7  6  sGo 
U007S0U0 
00079  luO 
0  00  7V200 
OOo  7S 3oc 
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2020  FURMATtbH  CBM 1 2 5A ,  I  2 , 39H  15  AN  INVALID  NUMBER  CF  VERTICIES  FOR  , 
X  2  A4  » 1 H .  ) 

202  1  FGRMAT(9H  CBM1261  ,2A4,9H  PUNCHED  -  ) 

2022  FORMAT (9H  CBM1291  ,2A9,14H  NOW  IN  PLACE-  ) 

202  3  FCRMAK9H  CBMl28i  ,2 A4,  14H  WAS  IN  PLACE.) 

20  2  A  FoFHAT(9H  C8M130A  ,2A4,  15h  USED  IN  PANELS, 14, AH  AND.l4,lh-J 
2025  FCRMAT19H  CBM  13 1 A  ,2A4,20H  HAS  SAME  NLM8ER  AS  ,2A4,1H-) 

202  6  FORMAT  19 H  CEM132A  ,2A4,21h  IS  A  DUPLICATE  NAME-) 

202  7  R0RhAT(9H  CBM133A  ,2A4,25H  NOT  PLANAR  FCR  VER T  IC 1 ES • I  2 • 1 H • . 12  »1H 

X  12. 4h  AND, 12  1 17H ,  DETERMINATE  IS  ,E15.7) 

2028  FORMAT (9 H  CBM 13h I  ,2 AS,5H  WITH.I5.12H  PANELS  AND,, IS, 

X  2  5h  CLNTRULS  hAS  BEEN  AODEC.) 

2  02  S  F  u  RM  A  T (9  H  CBM135A  ,2As,17H  NOT  ACCED  CUE  TC.15.lCh  ERROR ( S ) . ) 
2030  FGFMaT { L  6  H  CoMl3ol  MEMBER  ,2A9,9H  CHECK  ED ,  , 1 5 , 1CH  ERKOR(S).) 

2  j  3  1  FCRMATU9F  CBM  137  A  CATABASE  IS  NCT  A  CREW  STATION  DATABASE.) 

2032  FORMAT (2  7H  CbM1381  COMPRESS  FINISHED.) 

2033  FORMAT  ( 2  8  i-  CoM1391  INVALID  PANEL  T  YP  E , , I  4 , 1 2h  ,  FCR  PANEL  ,2A4  , 

X  2  OH .  (PANEL  INPUT  CARD)) 

209S  FORMAT (2  1R  Ct>M122I  PROGRAM  ENC.i 
ENC 


00079400 
00079500 
0  00  7  9  6  C  0 
00O79700 
00079800 
000  79900 
00080000 
oooeoioo 
, .00080200 
00080300 
00080400 
0  00  80  5oO 
000 60600 
00080700 
0008U  600 

0  00  oO  900 
00061  COO 
00081  luu 
000612O0 

00081300 
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APPENDIX  07 


COMBIMAN  SOURCE 


IBMGLD  LISTING 


T  1  ILE 
IbMGLO  CSECT 
SPACE  3 


1 I BMGLO ' 


♦ 

* 

* 

♦ 

* 

* 

* 

* 

***  * 


THE  IBMGLJ  CSECT  IS  CESIGnED  TU  CONVERT  (&K  2250  GRAPHIC  ORDER 
PROGRAMS  TO  GUULD  1  UR 1  CALCCMP  TYPE  PLCT  CROEKS. 

IT  IS  CALLEC  BY  GSPGLC,  WHICH  SUPPLIES  THE  2250  BUFFER  TABLE  AND 
/\  CCPY  CF  The  BUFFER  IN  MAIN  STORAGE. 
laMGLC  CREATES  A  *>.5”  BY  9.5"  GCULO  PLOT  COPY  OF  THE  2250  SCREEN. 

FIRST  hE  r.lLL  ISSUE  A  GETMAIN  FOR  A  SAVE  AREA  F OR  THIS  RCUTINE, 
WHICH  MANES  THIS  ROUTINE  RE-ENTRANT  ANC  SERIALLY  REUSABLE. 


SPACE 

USING 

5 

UC 

OC 

STM 

CNLP 

b  AL 

DC 

L 

SVC 
OR  CP 

SPACE  3 


♦t  15 

12 (RO,R 15) 

XL  1 ' Oo ' 

C I BMoL  D  9 
R14,R12, 12 ( k  13  ) 
0, 4 

k i ,  *+a 
At  72) 

R  J  *  0  ( R  1 1  RO  ) 

10 
15 


JEFINE  BASE  REC  FCR  REENTRANT  STRT 
SKIP  OVER  THE  ROUTINE  NAME 
DEF  INE  NAME  LENGTH 
OEFINE  NaME 

STORE  THE  CALLING  PROGb  kEGS 

SKIP  CVEK  GETMAIN  ARG  LIST 
OEFINE  LENGTH  OF  BYTES  FOR  SAVE  AREA 
LLAC  THE  GETMAIN  DATA  INTO  RO 
OC  THE  GETMAIN  FOk  A  SAVE  AREA 
DROP  R  15  AS  BASE 


SAVE  THE  CALLING  PRCGa  SAVE  AOCkCSSES  IN  THE  SAVE  AREA  CHAIN. 


SPALE  3 
LA 
ST 
ST 
LR 
L  M 

balk 
USINo 
L  JECT 


i  ******** 

R14,]2(R13)  LCAU  PREV  SAvE  AREm  AOOR 
Rltd(Rl3)  STORE  UUR  SAVE  AREA  ACOR 

R  l  3  t  4  (  K  1  )  STORE  CALL  IN  SAVE  mkEA  ADD*  IN  OCR  SA  Vt 
R 1 3  » R  l  LLAD  CuR  SAVE  AREA  ADDRESS  I  NT  C  TnE  SAVE  REG 
R14, Kl , J (R  1*  )  RELOAD  THE  LINKAGE  REGISTERS 
R 1  2  »  0 

*,12  UtFl.vE  OUR  BASE  REGISTER 


REGISTER  EQUATES 


i  *******  * 


0U000100 
00000200 
00000300 
00000400 
00000500 
00000600 
00000700 
00000 6L0 
00000900 
00001 000 
OOUOl  10 0 
00U0120U 

00001300 
000  01 400 
00001500 
00001 600 
0000170 0 
00001 800 
00001900 
00002000 
00002  100 
000U22U0 
00002300 
000024GO 
00002500 
0000 2600 
00002700 
00002  60 J 
00002900 
00003000 
OuGOi 100 
00003200 
00003  30 J 
00003*00 
000C3500 
00003600 
00003700 
000  C  3  800 
00003900 
0000*000 
00004  ICO 
0 000*200 
00004300 
00004400 


RO 

toe 

0 

000Q4  50 J 

R  1 

ECU 

1 

00004600 

*2 

ECU 

2 

MAIN  STORAGE  BUFFER  tCRY 

00004  700 

R3 

EQL 

3 

BUFFER  LENGTH/DUFFER  RESTART  ADDRESS 

0 00  04 800 

R4 

ECU 

* 

BUFFER  TABLE 

000  04900 

R5 

EOU 

5 

OOOOSuOO 

R  6 

ECU 

o 

JOG 05  loO 

R7 

EGU 

7 

000052U0 

R3 

EQL 

8 

000  05  3u0 

R9 

ECU 

9 

00005400 

RIO 

ECU 

10 

0  00  05  50 j 

R1  1 

E  CU 

11 

000056O0 

R  1*2 

ECU 

12 

EASE  REGISTER 

00005700 

Rli 

FQU 

1j 

000058UU 

R 1  * 

ECU 

14 

00005900 

R15 

ECU 

15 

00006000 

Fu 

ECU 

0 

00006  100 
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F2 

ECU 

2 

00006200 

F4 

ECU 

4 

00006300 

F6 

LOU 

6 

00006400 

♦ 

* 

* 

* 

* 

: 


EJECT 


SET  UP  AND  lALL  THE  GCULO  ENTRY  1  RE  SR  V  1  TC  RESERVE  AT  LEAST 
40 K  BYTES  CF  LORE  FOR  THE  USER  ROUTINES.  OTHERWISE  THE  GGuLD 
ROUTINES  wlLL  ONLY  SAVE  ABOUT  1  5K  . 


SPACE 


SPACE 


CALL  PLCTS  TC  DEFINE  THE  LIMITS  CF  CUR  PLOTTING  AREA  AND  TL 
INITIALIZE  THE  PLOTTER  ROUTINES.  THE  UNITS  FOR  THE  PLOTTER 
AREA  ARE  SET  TO  10. 0  FOR  THE  X  Aa  I  S  ,  AND  10.  C  GN  THE  Y-AXlS. 


00006500 
0  00  06  600 
00006700 
00006800 
00006900 
00007000 
00007 10U 
00007200 
00007300 
00007400 


SR 

R 1 1  ?  R 1  1 

CLEAR  REG  11 

00007500 

LM 

K2fR4tO(Rl) 

LOAD  IN  THE  INPLT  ARCS 

0 00  07  oOO 

LA 

R I , RS V  ARG  S 

LEAD  ADDRESS  CF  THE 

RESRV  CALL 

00007  700 

L 

R15,=V (KESRV) 

LOAD  acur  of  resrv 

ROUTINE 

00007600 

BALrv 

R14 » K1 5 

RtStRVE  40K  BYTES  FOR  MAIN  PORCG 

00007900 

SPACE  3 

LA 

L 

UALK 

SPACE 


R  1  »  P  LT  S 
R15f-Vt PLOTS) 
R14,R15 
3 


LLAC  ADDRESS  LF  FLCTS  AkG  LIST 

LOAD  ENTRY  POINT  FOR  PLCTS 

CALL  PLOTS  TO  INITIALIZE  PLOT  PKG 


MARGIN  TUP  AND  BOTTOM  ONE  LUARTER  INCH 


**  *  *  *  *  *  *  **  *  i 

SPACE 

LA 

L 

BALR 

tJECT 

***  i 
♦ 

SPACE  3 
SLR 
StP 
MV  I 
M  VC 
ST 
ST 
lh 

A  k 
LH 
STH 
UAL 

SPACE  3 


SPACE  j 
CKNEXT  CL  I 
BE 


rsl  .PLTLST3 
R 1 6  ,  =  V ( PLOT  I 

R  I  4  t  R  1  5 


t  ***<<«  **  * 


HOUSEKEEPING 


F  0  ,  F  0  CLEAR  OUT  THE  X  POSITION  REG 

F2,F2  CLFAR  OUT  THE  Y  POSITION  REGISTER 

GSRT ADO, X 1 00 • 

GSRTADD+M3)  , GSR  TACO  CLEAR  OLT  GR  ST  ADDRESS 

k4,  TABLE  SAVE  THE  BUFFER  TABLb  AUORESS 

R2  v START  SAVE  START  ADDRESS  JF  MAIN  CORE  BUFFER 

R4,0(K3)  LOAD  THE  BUFFER  LENGTH  6 ALUE 

R4.R2  S« V E  END  ADDRESS  CF  MAIN  CORE  bUFFER 

R 1  1 1  2 ( R  3 )  LOAD  THE  BUFFER  START  ADORLSS(GOS) 

Rllt OFFSET 

R 1 4 , CN V R 1  CLKVERT  TU  CORE  ADDRESS 


CHECK  FOR  GRAPHICS  OROER 


0  (  K  2  )  ,  X  1  2  A  1 
GCRDER 


CHECK  FcR  A  oPAPHICS  GROER  CGDE 
IF  FCUND  GO  PROCESS  1 T 


00008000 
00006 1G0 
00008200 
000083C0 
00008400 
00006300 
OuO  OS  600 
00006700 
00008800 
OOOC89UO 
00009000 
0 0009  luO 
0  00  09  2 00 
00009300 
000094C0 
00009300 
0  00  09  60 J 
00009700 
00009800 
00009900 
000 10000 
000 10 100 
000 10200 
00010300 
000 10400 
00010500 
00U1060J 
000  10700 
000106 00 
00010900 
00011000 
00011 100 
00G112C0 
00011300 
00011400 
0001150 0 
00011 oOO 
00011700 
00011600 
00011900 
00012000 
00012 10 0 
00012200 
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INC 

LA 

R2 , 2 (R  2  ) 

CR 

R4  ,  K2 

BNL 

CK  NE  XT 

b 

EuBERR 

SPACE 

3 

**  ♦  *  ; 

♦ 

CHECK  F  CR 

* 

cR ANCH 

♦*  *  *  1 

SPACE 

3 

GOROLR  CL  I 

1 ( R2  )  »  X  1  £2 

BL 

PL  T CRD* 

BH 

BY  PASS 

C 

R2  »  GSRT  ACC 

B  E 

OuNE 

ST 

R2  » GoR  T ACC 

H 

I.xC 

SPACE 

3 

increment  to  next  HALF  WORD 

SEE  IF  wE  hAve  CVER  RUN  THE  BUFFER 

IF  NOT  GO  CHECK  THE  NEXT  h* 

IF  Su  GO  1  NT C  THE  ERROR  RETLRN  MCDE 


>♦****************** 

SEE  IF  t. E  HA v £  A  GSRT  CODE 

LOV^Ek  CUDE  REQUIRES  PLOT  ACTION 

IF  HI  KE  CHECK  FOR  GTRL  AND  GCNOP  COOES 

END  IF  rtE  HAVE  LOOPED 

SAVE  ThE  GSRT  ADDRESS 
ARC  Go  LOCK  FOR  NEXT  ORDER 


************** 

♦ 

* 

*** 

SPACE 


CHECK  FOR  BRANCHES! FF ) f 
UFCA1E  R 2  ACCORDING  TO  ORDER  LENGTH 


BYPASS 


FOJR 


SI  X 


***  « 
* 


CL  1 
o  E 
CL  I 
oL 
CL  1 
BL 
CL  I 
u  L 
LA 

L 

LA 


1  {  R 2  )  »  X  *  FF  ' 
GTRU 

1  (  R  2  )  »  X  1  C  0  1 
INC 

1  {  R  2  ) »  X  1  E  b  1 
FOUR 

I  ( R2 ) • X  • FL  » 
SIX 

R^  *  4  (  K  2  ) 

CK  N  EXT 
R2 , 6 (K2  ) 
CnNEXT 


5.  A  GIRL  CODE? 

A.  YES.  GG  PROCESS 
Q.  LESS  THAN  CO?  CHECK  FLR  63-67 
A  •  YES.  GO  PINT  TC  NEXT  HALF  *CRO 
0.  LESS  ThAN  EB  ?  CHECK  F  CR  CO  t  EA 
A.  YES.  GC  POINT  TC  NEXT  WORD 
C.  LESS  THAN  FC?  CHECK  FCk  EB  L  EC 
A.  YES.  GG  POINT  mw AY  F R CM  6  BYTES 


Gu  CHECK  F  CR  ThE  NEXT  GRCLR  CODE 


EJECT 


cHECK  1u  SEE  IF  Hb  HAVE  LUuPGO  TC  5  T  AR  T  * 
IF  SO  END 


LOAD  THE  GTRL  BRANCH  ADCR 


k 1  I i 2 ( k2 ) 
Rll, OFFSET 
CuNE 

R 1 4 »  CNVR T 
CKNLXT 


IRANSLaTE  BUFFER  ADDRESS  TC  MAIN 
SlGhAGE  ADDRESS 


**  «  *  *  *  *  * 

bPACt 

CNVK  T 
GTLClP 


000  12300 
00012400 
00012  50J 
0  00 12  oOO 
000127O0 
00012600 
00012900 
00013000 
00013  100 
0001320 0 
00013300 
00013400 
00013500 
000 13600 
00013700 
00013800 
00013900 
00014000 
000141 GO 
00014200 
000l430u 
000  14<*0  0 
00014500 
000146U0 
00014700 
0  00 1 4  bUO 
000 14900 
00015000 
000 15100 
0001520L 
00015300 
000 15400 
000  15  5U0 
00015600 
00015700 
000 15600 
000 15900 
00016000 
00016 100 
OUO 16200 
000 16300 
00016400 
000  16500 
00016600 
000  1 o  700 
00016600 
00016900 
000I700O 
00017 100 
00017200 
00017300 
00017400 


L 

k2  ,  STAkT 

LOAD 

S1ART  ADDRESS  CF  LORE 

00017500 

L 

KB  ♦ T  AdL  E 

LOAD 

BUFFER  TABLE  ACDRLSS 

00017600 

L  A 

R  6  *  4  ( R  U  ) 

INCRE 

MFNT  BUFFER  AGGRESS 

000  177GO 

L  H 

KlC.Olkd) 

LOAD 

EUFFER  ADDRESS 

00017600 

LT  P 

*  1 C » R 1  0 

LHECK 

FuR  EinC  OF  TABLE 

000 17500 

b  L 

t  LB  E  Rk 

OOu ItiOuO 

LH 

R  9  *  2  { ■<  6  ) 

LOAD 

LENGTH  CF  ELF F Ek  SEGMENT 

00018100 

AP 

R 1  0  •  F  4 

F  INO 

LIMIT  uF  StGMLNT 

00016200 

CK 

R  1 1  ♦  fN  1 0 

C  0  *  R  t  C  T  SECMENT? 

000 183C0 
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BNF 

*  +  10 

AR 

R2*R9 

UP  OAT  E  MAIN  STORAGE  POINTER 

b 

GT  LOOP 

SR 

RIO, R9 

RIO 

PCINTS  tc  segment  start 

I  N 

BUFFER 

SR 

R1 1 t RIO 

R  1 1 

EOLALS  CFFSET  OF  BRANCH 

ADDRESS 

AR 

R2.R11 

NEw 

MAIN  STORAGE  PCINTER 

CR 

R2  ,  R  4 

SEE 

IF  wE  PAVE  A  END  OF  BUFFER 

ERROR 

BH 

EOBEKR 

IF 

SO  PROCESS  THE  ERROR 

b  R 

R  1  4 

EJECT 


* 

$ 

**  *  * 

SPACE 
PLTCfrO* 


iF  STOP  REGENERATION  ORDER  ♦ 
THEN  END 


C  *  *  *  * 


CL  I 

1 ( R2 ) »  X 1 

'  80' 

C  H  EC  K  FOR 

A  GNGP2  CCD E 

BE 

INC 

IF  SO  SKIP 

TO  NEXT  CODE 

dH 

OuN  t 

w  E  HAVE  AN 

END  CROER  SEvuENCE 

CL  I 

1  (  R2 ) , X  « 

1  4u  1 

C  h  EC  K  FG  k 

A  TEST  CR  VECTOR  CCKMANC 

LL 

VECTORS 

IF  LOw  wE 

HAVE  VECTORS 

SPAC  E 


***  *  > 
* 

***  V  3 


SPACE 


:  *  *  $ 


PROCESS  CHARACTER  STRINGS 


LA 

K5  »  2 (R2 ) 

COMPUTE  TPE  A CCR  CF  THE  1ST  CHARACTER 

LA 

R  6 , w  OR  K 

LOAD  ADDRESS  FC  CUP  *ORN  AREA 

LI 

CLI 

OCPSItX'ZA* 

TEST  FuR  A  NEW  GkaPHICS  COMMAND 

BE 

ENDCS 

IF  50  wE  ARE  AT  END  FC  CHAR  STRING 

CL  1 

0( R5 ) , X' CC1 

TEST  FOR  A  NULL  CHARAC  TLR 

dN  E 

S  A V  ECh 

IF  NOT  THEN  ^E  SAVE  THIS  CHAR 

INCK5 

LA 

*5,  1  (K5  ) 

INCREMENT  TO  THE  NEXT  CHARACTER 

CR 

R4  ,  R  8 

CHECK  FOR  END  OF  BUFFER 

BNL 

LI 

IF  NOT  ECO  GC  CHECK  NEXT  C P AR 

b 

ECbERR 

OTHERWISE  GO  RETURN  *1Th  ERROR  INDICATION 

SAV  ECH 

MVC 

U(  1,  Ro)  , C(R5)  MOVE  CFAR  TC  WUkK  AREA 

LA 

R6,  1 ( k 6  ) 

UNPDaTE  1  PE  WORK  AREA  ADDRESS 

L 

I  NCR  8 

GO  UPDATE  R  5  AND  CHECK  NEXT  CHAR 

ENOuS 

LK 

R7  ,  R  5 

SAVE  REG  5 

SRL 

K7  ,  1 

CIVIDE  EY  7*0 

SLL 

k/  ,  1 

MULTIPLY  BY  2 

CR 

R  / ,  R  5 

SEE  IF  LUST  A  dIT 

ONE 

SAVECH 

NE  M  E ANS  NOT  CN  h*  BOUNDARY 

LA 

K  7  ,  *  Qrv  K 

LLAC  THE  ADDRESS  CF  I H E  CHAR  STRING 

Sk 

R6,R7 

CUM  PJT  t  The  HUM  G  t R  CF  CHARS  IN  ST  K I Nb 

bNP 

LGAC2 

DO  NOT  PROCESS  0  LENGTH  STRINGS 

sth 

R6  .SYMLEN+2 

STORE  Tht  LENGTH  IN  ThE  SYMBOL  R TN 

L 

rvl5,  =V  (  SVMbUL  )  LUAC  THE  ADDRESS  FOR  The  SYMBOL  ROuTl 

LA 

RI.SYMlIST 

LOaC  the  argument  list  ADDRESS 

SPA 

CE  i 

TM 

1  (  R  2  )  ,  X  '  0 1  1 

TEST  F  CR  CHARACTER  SIZE 

b  L 

SMALL 

MVC 

hG  T  »  LARGE 

MUST  NEED  LARG  CHARA BIERS 

MVC 

HHGT  ,  H  L  m  R  0  E 

u 

SIMdCL 

GC  CALL  SYMBOL 

S.MAL  L 

MVC 

HOT  1 2aS  IC 

NEED  SMALL  SIZE  CHARACTERS 

K  VC 

hhGT ,  n  b  A  S  I C 

simbcl 

SE 

F  0  ,  H FoT 

ADJUST  FOR  TFE  CHARACTER  SPACING 

SE 

F2, HH^T 

DiFrEkENCc  BETWEEN  uUOLO  £  2250 

STE 

f  0  tX 

STOKE  THE  X  PCSIT  ICN  VALUE 

STE 

f2  ,Y 

STORE  THE  Y  POSITION  VALUE 

00018400 
000185C0 
000186U0 
000 18700 
00018800 
00018900 
00019000 
00019100 
00019200 
00019300 
000  19400 
00019800 
0001960U 
00019700 
00019800 
000  19900 
00020000 
00020100 
0O020200 
0002030 J 
00020400 
000  20  80 J 
00020600 
00020700 
00020800 
00020900 
00021000 
00021 100 
00021 200 
000  2 1  30«j 

000214CO 
00021 800 
0  00  2 1 coQ 
00021700 
00021o00 
00021900 
0  00  22  000 
00022  100 
00022200 
00022300 
00022400 
00022  500 
00022o00 
00022700 
00022800 
00022900 
00023000 
00023 100 
00023200 
00023300 
00023400 
00023800 
00023600 
00023700 
00023800 
0002390U 
000  24000 
00024100 
000  2h  200 
00024300 
00024400 
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LOA  0  2 


3  A  L  R 

R  1  4  »  R  1  5 

LA 

Rif WLST 

L 

R15t =V (WHERE  ) 

BALK 

R  1  4  ♦  R 1  5 

LE 

X 

o 

Li. 

LE 

E2tY 

AE 

FO  »  HHGT 

AE 

F2 , HHGT 

LR 

R2  » R  5 

B 

CkNEXT 

CALL  SYMBOL  TO  PLCT  CHAR  STRING 

LOCATE  BEAR  POSITION 
AFTER  PLOTTING 

RELOAC  THE  X  POSITION  REGISTER 
RELOAD  THE  Y  POSITION  REGISTER 


UPOATE  THE  R2  ADDRESS 


EJECT 

*  PROCESS  VECTORS/POINTS 

*****«*****«**.****#******«***«*****************************«********** 

SPACE  3 
VECTORS 


CPE  N  S*>2 


VS  h  1 


FLT  X 


FlT  y 


MV  I 

VSWl+1 tC ' 0 

'  SET  1  NCR  KUO E  BYPASS  SWITCH  ON 

MV  I 

VS  *2  +  1 , C  1  0 

'  SET  PGINT  LINE  SWITCH  To  LINE  MODE 

CL  I 

1  ( R2  ) »  X 1 02 

'  TEST  FCR  A  GEVM  COCE 

BE 

GPENSw  2  +  4 

IF  SO  SWITCHERS  ARE  OK 

jL 

*  +  3  I  FLCV. 

*E  HAVE  PuINTS  WITH  Hw  abs  values 

MV  I 

o 

X 

+ 

oO 

> 

'  SET  SWITCH  FOR  I NC R  KuCE 

CL  I 

1 1 R 2 ) »  X 1 05 

'  TEST  FCR  POINT  MCOE  I  NCR  TYPE 

BE 

*  +  a 

MV  I 

V6h2  +  l  t'X  f00f  SET  SWITCH  F  CR  POINT  PLCT  NODE 

Lm 

R2.2U2) 

INCREMENT  R2 

CR 

K2 »  R  4 

CHECK  FOR  END  OF  BUFFER 

6H 

EoBERn 

1 F  SG  PROCESS  THE  EKKCK 

CL  I 

0 l R2  > • X ' 2A 

'  CHECK  FOR  A  NE*  GRAPHICS  ORDER 

b  E 

GORJ ER 

IF  SG  GC  PROCESS  NEW  COMMAND 

SR 

R  6  *  R  6 

SR 

R  7  t  fS  7 

CLEAR  RR 1  $  6  £7 

NOP 

NOTING  S». 

I T  LH  FOR  dYPmSSING  1NCR  VECTOR  MODE 

LH 

R6.0IR2 ) 

LCAO  THE'  X,Y, BEAM  VALLES  INTO  Ro 

S  k  l  A 

Ro  *  S 

SHIFT  BEAM  AND  V  VALCES  INTO  K7 

SDR 

F4  »  F  4 

CLEAR  FLCAT  RtG  4 

MV  I 

FLT  X,x * 6A’ 

SET  FOR  A  POSITIVE  INCREMENT 

SL  A 

R  o  » 2 

MULTIPLY  bY  4 

dM 

FLT  X— 4 

if  positive  ajl  it  into  the  x  keg 

BE 

FlT  X+10 

L  PR 

R 6  *  Kc 

IF  NEGATIVE  M a K L  IT  POSITIVE 

MV  I 

FlTX.X '6b' 

ANO  SET  THE  FLOAT  FOR  A  SUBTRACTION 

ST 

kb  » FLT  f'P+4 

STORE  THE  VALUE  INTO  TEMP  FLOmT  AREA 

AO 

F4  t  F  LT  MP 

FLGAT  THE  INCR  VALLE  INTO  F4 

ME 

F4, KU2SL 

CONVERT  TU  PKlHER  CSALt  SIZE 

AER 

FO  ,  F  4 

ADD  IT  TU  THE  X  POSITION  KEG 

SOW 

F  o  »  F  6 

CLEAR  FLOAT  REG  6 

SL  L 

R7  t  1 

REMuVE  EXTRA  BIT  FRuM  Y  VALUt 

SLCL 

Ro  » 7 

MOVE  V  VALUE  1M0  R6 

SL  L 

R6 ,25 

SHIFT  SIGN  till  INTO  PCSiTILN 

MV  I 

FlTY.X  *oA* 

SET  FLOAT  Fun  A  PcS  INCR 

SkA 

Kb  t  23 

PROPAGATE  SIGN  o I T  OGWN 

bH 

F  L  TY— 4 

IF  ALREADY  POSITIVE  GL  PPCCtSS  n 

0  E 

flty+io 

MV  I 

FLTV  ,X  *  ot ' 

SET  FCR  MINOS  INCREMENT 

L  PR 

no  »  K6 

RELOAD  R 6  w I Th  A  POSITIVE  VALUE 

ST 

R6 t F  LT  M  P  +  4 

STGRt  THE  VALUE  INTl,  1EMP  FLOAT  AREA 

Fb  ,  FL1  i*P 

FLOAT  THE  Y  INCR  VALLE  INTO  Fo 

ME 

F  o  *  RU2  S  L 

SCALE  IT  OF  R  SCAN  LINES  NCI  RASTER  ONITS 

AEk 

F2  *  F  d 

* DD  IHE  INCREMENT  Tu  lHt  Y  PGSlTluN  REu 

SR 

Ro  iRc 

CLEAR  REG  6 

2>  L  DL 

Rot  1 

MOVE  BEAM  INDICATOR  IMG  K6 

0  00  24  bOO 
00024600 
000247GO 
00024  800 
00024900 
00025000 
00025100 
00025200 
00025300 
0002540O 
00025500 
0  Ou  2  5  cOu 
00025700 
00025800 
00025900 
00026000 
0  00  2o 1 00 
00026200 
0  00  2o  300 
00026400 
0  002  o  500 
000  2o ooO 
0  00  2o  700 
0  00  2  6  60 J 
0  00  2  u  900 
0O0270OO 
00027  100 
0002  7200 
00027300 
00027400 
00027500 
000  27oOO 
000277O0 
0002  7  80 J 
0  00  2  7  90 J 
0  00  2 b  COO 
00028 100 
00028  2oO 
00026300 
0002B40 J 
00028500 
00028600 
0  Ou2  8  7uO 
00028800 
0  JO  2  8  900 
000290u0 
U  00  29  100 
00029200 
000  29  300 
00O29^fO0 
0 00  29  500 
0  00  29600 
00029700 
0  00  29  80 J 
00029900 
00030000 
00030100 
00030200 
00030300 
00030400 
00030500 
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VS  *2 


LINES 


b 

SET4PLT 

GG  PLCT  THE  VECTOR 

00030600 

LH 

R7  ,  0  Ik  2  ) 

LCAO  THE  X  VALLE  INTO  R7 

00030700 

SLCA 

R6 ,  1 6 

MCVE  eE  AM  INDICATOR  INTO  REG  6 

00030800 

SRL 

R7  » 1 6 

READJUST  THE  X  VALLE 

00030900 

ST 

R7 » F  LT  MP+4 

STORE  THE  VALUE  INTO  TEMP  FLOAT  AREA 

00031000 

SOR 

FO ,  FO 

CLEAR  THE  X  POSITION  REGISTER 

00031100 

AO 

FO, FLTMP 

LCAO  IN  THE  Ntk  X  POSITION 

00031200 

ME 

F  0  ♦ RU2  SL 

SCALE  IT  FOR  SCAN  LINES  N  C  T  RASTER  UNITS 

00031300 

LA 

k2,2(R2 J 

UPDATE  THE  REG  2  ACOR 

00031400 

SOP 

F 2  »  F2 

CLEAR  THE  Y  PGS1TI0N  REGISTER 

00031 500 

LH 

R7  ?  0  (R  2  ) 

LCAL  THE  Y  VALLE  lNTC  R7 

00031600 

ST 

R  7  »  FLT  MP+4 

STCRC  THE  VALUE  INTO  TEMP  FLOAT  AREA 

00031 700 

AO 

F2  »  F  LT  MP 

LOAD  Y  VALUE  i N  TC  ThE  Y  POSITION  REG 

00031  600 

ME 

F2,RU2SL 

SOLE  IT  FOR  SCAN  LINES  NUT  RASTER  UNITS 

000319 Oo 

STE 

FO,X 

S10RE  TFE  X  POSITION 

OOu 32000 

STL 

F2  » Y 

STORE  ThE  Y  POSITION 

00032  100 

L 

K 1 5  t  =V ( PLOT  I 

L  C  AC  ADDRESS  OF  Thfc  PLQT  ROUTINE 

0003220U 

LA 

R1 , PLTLST 

LCAC  THE  ARGUMENT  LIST  ADDRESS 

00032300 

LA 

R  7 , 2 

LOAD  A  2  INTO  kEG  7 

U 0032*00 

NOP 

LlNtS 

SKIP  IF  RE  AREA  IN  LINE  MCOE 

00032500 

MV  I 

I  P  E  N  +  > ,  X  •  3  1 

SET  IPEN  TO  OFF 

000  32 600 

b  A  LR 

R14,RI 5 

GC  MOVE  TO  THE  POINT  FOR  PLOT 

00032700 

LC 

FO,  X 

RELOAD  THE  X  VALUE 

00032600 

Lb 

F2,  Y 

RElOAC  THE  Y  REG 

00032900 

LTk 

Ko  ,  R6 

Q  •  A  POINT  TC  LE  PLOTTED? 

00033000 

ft  N  t 

CPENS*2  +  4 

A.  NX.  PROCESS  NEXT  VECTOR 

00033 100 

LA 

R1,PLTlST2 

A.  YES.  DOUBLE  wIEcHl  POINTS 

OOG  33200 

L 

R 1 5 , =V ( PLLTI 

0 0033300 

d  A  LR 

R 1  4 ,  R  I  5 

0003340 0 

0 

lLAOFx Y 

GC  RELOAD  FLOATING  REGS 

00033500 

AR 

R7  *  R6 

COMPUTE  ThE  IPEN  CODE  1= 

0003360 J 

ST 

k  7  ,  IPEN 

SAVE  IT  IN  THE  IPEN  VALUE  AREA 

000337u0 

LA 

Rl, PLTLST 

00033600 

L 

R1 5t*V ( PLOT) 

0003390O 

BALK 

P14,RI 5 

GC  CAul  PLOT  RuLT INE 

0  00  34  00 J 

LE 

FO  ♦  X 

kELGaD  THE  FLCATINC  REG  FO 

00034100 

LL 

F2,Y 

RELOAD  ThE  FLOATING  REo  F2 

00034200 

6 

CPtN  Sh  2  +  4 

GC  TC  PROCESS  THE  NEXT  VECTOR 

0003430*, 

EJECT 


SPACE 

* 

* 

********* 

SPACE  3 
SY ML  I  ST  ~*L 


DATA  DECLARATIONS  I 


***  ***** 

GoK  T  ADO 

* 

DC 

F  1 

'0  1 

offset 

* 

DC 

XL  4 1 C0003F FF 

SY  AL  EN 

DC 

H  ' 

1  0  * 

* 

DC 

H  1 

O' 

ZEKC 

DC 

F  1 

1  G  • 

NEG  1 

OC 

F  1 

-1* 

NEG3 

DC 

F  1 

1  -3  • 

T*U 

OC 

F  1 

'2' 

ARGUMENT  LIST 
SYf’icC  L 


FCn 


E ******************* 


A  (  A  ) 


00034  40C 
0003 4500 
00034600 
000347C-U 
00034600 
00034900 
0003500,, 
00035100 
00035200 
00035300 
00035400 
00035500 
00035600 
000  35  700 
00035600 
0  00  3  5  900 
OOC  360o0 
00036100 
00036200 
00036300 
0  00  3o 400 
000  3c  500 
000  3c  cOO 
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DC 

A  (  Y  ) 

00036700 

HE  1  G  HT 

DC 

A ( HGT 1 

00036800 

OC 

A ( *CRK  1 

0  00  36  90u 

DC 

A ( ZERO  1 

00037000 

DC 

X'  60  ' 

0  OC  37 100 

DC 

A L 3 ( 5Y  ML  EN  ) 

00037200 

k  JECT 

00037300 

********* 

*********************  00037400 

♦ 

ThREE  SEPARATE  ARGUMENT  LISTS 

00037600 

* 

FOR  PLCT 

00037600 

*********************  0 jo  3 7  70 j 

SPACE 

3 

00037800 

PL T  L  ST 

OC 

A  (  X  1 

O0037SO0 

DC 

A  (  V  ) 

00038000 

DC 

X'  60' 

00038 100 

DC 

AL 3  (  iPEN  ) 

OCO  38  200 

SPAl  e 

2 

QUO  36  3o 0 

PLTLST2 

OC 

A  (  X  ) 

0  00  38  400 

OC 

A  (  Y  ) 

000  3c bGO 

DC 

A  (  1  v\C  1 

0u038ec^ 

OC 

X*  8C  ' 

00038700 

OC 

A  L  3  (  N  E  G  1  1 

00038600 

SPAct 

2 

0  00 3o  900 

PlT  lST 3 

DC 

A ( F^UAaT  1 

0  OC  39oo^ 

OC 

A ( FwCART 1 

00039  100 

uC 

X*  6C* 

000392C J 

DC 

AL  3 ( NE  G  3  ) 

00039300 

SPAlE 

3 

0 uO  39  4 uO 

***«*«**; 

* 

* 

***  *  I 

SPACE 

TAcJ  L  c  D C 

START  OC 

EJECT 


PROGRAM  STASH  AREA 


F  '  C  ' 
F  '  0  ' 


CAT  A  CECL  AR  A  T  1  0»\S  11 


i******«**************** 


C0o39b00 
OOO  39600 
0  0039  7uG 
U0O3S8O0 
000399C0 
0  00  40  OC  0 
u 00  40 100 
00040200 
COO  40  3o0 
0  00  4  0400 
COO  40  600 


large 

0  j 

E'u.lS^oTd1  *  1  0  T  h 

uF 

large 

CHARACTER 

00040600 

HLARGE 

Do 

E ' 0. 6929  * 

0  Oo  40  7oO 

EaS  IC 

OC 

E'C. 128  378*  hlCTr- 

OF 

BASIC 

CHARACTER 

00040800 

HOA  SIC 

DO 

E* 0*064189* 

C  00  40  9uu 

RU2SL 

DC 

E  '  0  •  00  2  2  19  * 

0  00  41  00  J 

X 

DC 

F  *  0  * 

00041 100 

Y 

DC 

F*  0* 

U0041 20u 

IPE  N 

DC 

F*  0* 

00041 300 

NINES 

OC 

E ' 999*0  ' 

00041 40u 

WORK 

DC 

20  CL  4 ' 

00041 bOC 

HGT 

DC 

F*  0  * 

00041 cOO 

HHGT 

DC 

F*  0  * 

00041 700 

CNCP 

0,  8 

00041 800 

fltmp 

Ol 

XLd ' 4L00CCC000CCC0CC* 

00041900 

**  *  *  ♦  *  *  *  * 

* 

************ 

PL T  S  OC 

OC 
OC 

* 


ARGUMENT  LIST  FuR  PlDTS 

A ( XMAX  ) 
x  •  SC  • 

A  L  3  l  YM  A  X  ) 

uAT  A  CtCLARAT  lb.\$  1  1  I 


0  CO  42  000 
00042  100 
00042200 
0  00  42  3  JO 
00042400 
U 00  42  500 
0  00  42  6 JO 
00042700 
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00042800 

XMAX 

OC 

E* 10.0' 

00042900 

* 

00043000 

YMAX 

DC 

E' 10.0' 

00043 100 

♦ 

00043200 

FUUART 

CC 

E'0.25' 

00043300 

SPACE 

3 

0004340U 

00043500 

* 

ARGUMENT  LIST  FOR  RESERV 

0  00^3  oOO 

00043700 

RSVARGS 

DC 

X  '  80 ' 

000 43 800 

DC 

AL3IK40) 

0004390 0 

****«**«***«******±***±***************4*******4*********«************* 

00044000 

* 

DATA  DECLARATIONS  IV 

0J04410 0 

00044200 

KAO 

DC 

F ' 40000  * 

00044  300 

SVELEN 

OC 

A  {  72) 

0  00444GG 

*** *  *  **  * 

00044500 

♦ 

ARGUMENT  LIST  FOR  WHERE 

0JU44&00 

000  44  7  CO 

WL  S  T 

OC 

A  (  X  ) 

00044800 

OC 

A  (  Y  ) 

00044500 

uC 

X  1  80  1 

00045000 

OC 

AL  3 ( WORK  i 

U  00  45 100 

EJECT 

00045200 

* 

00045300 

CONE 

MV  I 

REICCOE.X'O'  CLEAR  TFE  RETURN  CCOE  VALLE 

00045400 

Z999. 

LA 

R i «  PLT 1ST 

00045500 

LA 

Ki  i  ,999 

00045600 

ST 

Ri  i ,  ip en  end  plot 

00045700 

SR 

R  1 1 1  R 1 1 

00045800 

ST 

Rl  1  ,X 

000459UU 

ST 

Kl  1  ,  Y 

00046000 

L 

R  l  5  ,  -  V  ( PLOT) 

0  00  46  100 

6AL* 

R  1  4  »  K 1  5 

00046200 

Sk 

PI  ,R1  CLEAR  F  t  Cl 

0004630 0 

L 

k  1  5  * •=  V  (  C  L SGUT )  LOAD  ACCR  OF  CLSCUT  ROUTINE 

000*6400 

CALK 

R  1  4  ,  k  1  5  GO  CLOSE  THE  GbULC  RCjTlNES 

0  00  46  5uO 

L  A 

R 1 , C (R 13  ) 

0004O600 

L 

Ru , SVE  L  E  N 

00046700 

L 

R 1 3 , 4 ( R  1  3 )  LOAD  CALLING  PRCoS  RETURN 

ADDRESS 

00046600 

SVC 

10  EXECUTE  THE  F  h  c  E  *v  A  I  N  SVC 

00046900 

L  M 

Kl4*R12t  12(R13)  RELOAC  CALLING  PRCGS 

RE  C 1 STERS 

00047000 

MV  I 

l  2  (  R 1 3)  »  X  •  FF  •  SC  T  RETURN  1NCIOTCR 

00047  ICO 

LA 

R 1 5 , 0  SET  RETLRN  COCE 

0004720U 

OR  G 

*-l  RE-CR1G1N  FJR  PUTTING  RETCGDE  INTO  HV1 

1  NST 

0 0047  300 

RET  C  CUE 

DS 

CL  1  DEFINE  SAACE  FOR  THE  RETURN  CUCE 

IN  MV  1 

INST 

00O47400 

dk 

R 1 4  RETURN  TO  THE  CaLLING  PROGRAM 

00047500 

EUd  E  kk 

MV  1 

kETw.C0l,X,4* 

00047600 

ij 

DONE ♦4 

00047700 

SPACE  4 

00047800 

END 

00047500 
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APPENDIX  D 


//CbMAP 
//J08LI6 
/ /CBM AM 
//FT02F001 
//FT02F001 
// 

// 

/  /  F705  FOO 1 
//FT06F001 
//FT37F001 
//SYSUOUMP 
//SYS  IN 
+  IM 


JCL  AND  DATA  REQUIRED  TO  CREATE 
67  USAF  AND  70  ARMY  SURVEY  MEMBERS  AND 
R67  USAF  AND  R70  ARMY  REGRESSION  MEMBERS 
OF  THE  COMBIMAN  ANTHROPOMETRIC  DATA  BASE 


oca  hess 

DD  DSN-C0MSI PAN.LOADLId.O 1 SP*SHa 
EXEC  PGM-CBMAM 

CC  DSN®COMBIPAN.ANlHCATAtD ISP*SHR 

00  OSMCOMBI  MAN.ANTHOATA.UM  T*0  i  SKtJI  SP*  (  ^Ew.CATLG  )  t 
VUL»SER*D  ISKO  it  SPACE-  12  A8 ,2000  , 

DC&-I6LK.S  IZE*2Afi,LRECL*2A6,RECFM-FE) 

CC  ODNAHE*  S Y  SIN 
DD  SYSOUT-A 
CC  SYSGUT-B 
DO  SYSCuT-A 
DO  * 


OOCJIOOO 
OOuO  11 00 
000012  00 
Ooo J  1300 
0  0  0 o  1 3  00 
3003  13  1 
00  00 1 J  2 
00  uO 1400 
00^01500 
00  00  lo  CC 
00001700 
00  00  lb  00 


c>  c. 


MfcMotK  NAME  JSAF 

♦ACC  R67  US  A  F  C  17  24  12 


1 

n= lGhl 

L8  1 

2 

Si  I  TINS 

h  E  I G  h  T 

IN  1 

3 

EVE 

HG1/SITT 1 NG 

IN  1 

4 

ACRCKloN  hoT/SIT 

IN 

5 

KinE  E 

H  o 

T/SI77  1NG 

IN  1 

o 

80  T 1 GCK 

-KNE  LGlh 

IN  1 

7 

Sn  COLOR 

-ELd  Lo7h 

IN 

b 

cLdtVv-OKlP  LGTH 

IN  1 

5 

lhuNb-T 1 P  REaLm 

IN  1 

1  J 

fclACRCMlAL  bKLTh 

iN 

1  1 

Dl  OELT  IuC  8  f<  C  T  n 

IN  1 

12 

hi  P 

dKE ADIm 

IN 

13 

hi  P 

8kc ACT n/ S  il T 

IN  1 

14 

jrl  lST  utPTri 

IN  1 

1  5 

FuGT 

L  t No  1  m 

IN 

1  6 

Mm  NC 

Lc.\o7h 

IN 

17 

EL  8  L  w —  * 

klST  LGlhi 

IN 

1 

2 

0 . 0  2o  c9 

32.05275 

1 

2 

1 

1.0 

C  .  c 

1 

2 

2 

0.0 

1 . cocoooo 

1 

2 

4 

.7  31 

1 

2 

5 

.  4  C  4 

A 

2 

o 

.323 

1 

2 

7 

.  <l  4  7 

1 

2 

10 

C.G13  1732 

0  .  1 1 J  5  00  0 

1 

2 

12 

G. 0275173 

0  .  C  04 3G*j 0 

1 

2 

1* 

o .0313 o 31 

-G.  16c  5C00 

1 

2 

15 

0 • J  0657  24 

u  .  12  4  oC J 0 

1 

2 

lo 

.  1  17 

1 

2 

17 

.  152 

1 

3 

o  .  0  2  2  6  7 

27.d4t5o 

1 

8 

1 

1.0 

G.C 

1 

3 

2 

U  .  5  79 

1 

5 

* 

3.737 

1 

3 

5 

.^C3 

1 

3 

o 

.349 

1 

8 

7 

.  260 

1 

J 

10 

U. 014  1614 

G.C9570 OC 

1 

3 

12 

U .02 7ol 39 

0 . L05  300  0 

1 

3 

14 

0  •  0  3  3  4  ?2  1 

“  u  .  1  5  O  /  v  J  u 

1 

3 

15 

0.J07  5<i  J6 

0  •  12 1  5  u  J  0 

1 

3 

It 

.  1  13 

1 

3 

1  7 

.  172 

1 

5 

0  •  C  2**  70 

1  7 . 0  c  5  a  :> 

1 

5 

1 

1  .0 

C.C 

1 

5 

2 

.  c  66 

1 

5 

* 

.  5  10 

1 

u 

E* 

0  •  0 

1  .  CjiyOCoJ 

1 

5 

6 

.651 

1 

0 

7 

.516 

1 

5 

lo 

0. 0125c30 

0. 144  2Co  0 

1 

3 

12 

u  .0 2  o  2x:  03 

”0 . Cu8  1  Ju  0 

1 

5 

14 

C. 0^01690 

-0. 1 3  *  700  c 

1 

15 

0.OU3C315 

C. 2947c Ju 

1 

3 

16 

.215 

1 

5 

17 

.443 

1 

0 

0 . u31 5o 

16.2939* 

JJjIjjuj 
J  J  Ul  vy  1  J  J 

J  0  C  i  <j2.  o  j 

j  <J  u  I  J  j  u  J 

J  C  C  1  J*1  00 
^vyUlCOO*/ 

Jy  l>l  w  O  JJ 

0  J  0  1  Cf  <JJ 

\J  \J  V>  1  \J  i>  \J  0 

uo  k/  i  w.'  7  J ./ 
JO  Ji  i  J  J J 

J  J  J  1  i  1  ^7  J 
Jv  o  l  [2  w»  J 
j  J  Wi  1  3  yj 
0  U  «J  1  l*t  J.jl 
J»<  Ji  13  J  J 
J  J  l/i.  1  w  2  \J 

Juul 17  0 J 

7. 84  5  3o- 11  A. cJcjl  15. J59ic  J  O  J  i  a.0  vJ  J 

i/JULtJ  J  U 
J  0  o  1 2  i Jj 
o^Oi  t.2  0 'J 

JyOttyJU 

J  </  J  1  c  't  0  ^ 
JoJlcOJ*/ 
J JO  1 2o  Jo 
0  0 1  2  7  c 

J  vl  l>  1  L  j  sJ  V 

J  u  U 1  2  7  U  u 

J  J  Oi  Jo 

7 . h5c  5  7  — jA.o27ci  15.52156  Jjui31CJ 

j  j  o  1  3c0j 
J  J  u  L  JJ  j  J 

Jv  ol  jl  Jj 

j jUI ; j  jj 
0</  v  1  JC  J  J 
OJolo/  o  O 

J  J  o  i  io  J  J 
JJUI  J  9  vJo 
J  J  Jl  -r^  J  J 
J  %J  0  i  1  J  J 
J  <j  o'  i  -*2  J 
jj  jI'o  j0 

1 1  •  7  cl  73  “o4.  oii  4*»  lti.ub-t^S  J  J  u  1  t*t  u  J 

J luU:)  0 J 

O  «J  O  »  -t  j  Jv 

JJUl  t  7  )\J 
jji  l  *td  Jj 
J  J  ol  ‘»9  0j 
j  j  j  1  >  j  J  J 
J  J  u  L  5  l  J  J 
J  J  j  i  c  /  o  J 

jjoi jj 

)  J  j  l  5~*jJ 

J o  01  55  Jw 
J  J  0  i  ;>  c  0  J 

12* d 12 57- 13 1. 03hcJ  16.53596  OOGIj/jO 


1 

1 

1 

1 

1 

1 


1 

1 

1 

1 

1 

1 

l.llltl 

o.c 
0  .0 

-2.775522 
7.  133844 

1  1  •  56c9  Co 
5.C9C54  1 

9  .  c 54 1 7 
a . c  795  7 
1 C . 3 295  8 
* • c  54  6  8 
3.232277 
*.  72833  7 
1  .  0  c  1 1  6 
O.C 

5 . 48  24  1 

0.55118 
9.  114155 
12  .to  1352 
5. 6o  1 13 
10  .£4526 
8 .7580  2 
5  .  -i  1976 
5 .4653  2 
3 .521252 
6 . 25  5^6  3 
0  •  £  2  7  3  c 
O.C 

^2.2  c342 
12  .8  38557 
O.C 

5. C56415 
2.822625 
10  .c£774 
5 . 1 1 1 1  6 
7 .3723  0 
3  .6*651 
2 • coi  14  4 

2  .  Co  2  c  7  3 
C. 62105 
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1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

1 

i 

1 

1 

1 

] 

1 

1 

1 

1 

1 

1  i 

1 1 

1 1 

1 1 

1 1 

1 1 

1 1 

L  1 

1  1 

1  1 

1  1 

L  1 

1  1 

11 

1  1 

1  1 

1  1 

1  1 

1  1 

1  1 


jS*F 


o 

1 

1.0 

G.C 

o.c 

c 

2 

•  9  c  0 

25 .799093 

6 

9 

•  3  3d 

15.523to51 

o 

5 

.725 

9. 712585 

6 

o 

u  •  0 

1 . C  0  OC 0  c C 

C.C 

to 

7 

.992 

3  .  fc9 1  72  5 

G 

10 

0.0156071 

0.  CC'y  700C 

13  .CtC 1 C 

6 

1 2 

0.026  /  *  S  3 

G • C9 1 2 60  0 

d.*tto76 

to 

19 

>>  .U29  jo  i9- 

■0. C 7 5  50u 0 

o  -99 too  o 

o 

13 

u . OG  33  7d0 

0. 2 1 5  20c C 

H.8935C 

to 

16 

.165 

3. 55691b 

to 

17 

.  3*7 

9.C31966 

0 

0 . j 1 2  12 

11.75517 

0.56196 

d 

1 

1.3 

O.c 

o.c 

to 

2 

.  5Cto 

2*1 .125536 

6 

9 

.  6  76 

19  .c  c  52  6  2 

8 

5 

1.206 

5.*9cl97 

o 

to 

1.093 

9.c2c753 

to 

7 

.  7  15 

*t  •  2*t  9  0  6  6 

0 

10 

c. J132520 

0.23to2G0C 

1C  .9602  7 

0 

12 

0.0276150 

u • C  1  7  6  C  0  c 

b  .61  1  1  to 

d 

19 

u  .0  2  6  72 99 - 

•0.  lto  2  80 J  u 

c  .  /  6toS  6 

0 

13 

u.Ou53790 

0.9061000 

9  •  C  6  1  9  7 

o 

16 

.359 

2.597235 

d 

1  7 

.763 

.  5  25 1 32 

9 

j  .03029 

*6. 35623 

1.9261* 

9 

1 

1.0 

0  .  C 

O.C 

9 

2 

.  330 

2 c  .251516 

9 

9 

.250 

lto.l2too26 

9 

3 

.9  39 

d.C797£7 

* 

to 

.910 

10.olbd7c 

9 

7 

.251 

9.552796 

9 

lo 

0. 0 I36b  1 1 

0. GdU50j0 

11.11938 

9 

12 

G.J2blc93- 

*0  •  COhoOjC 
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APPENDIX  F 

THE  JCL  AND  DATA  REQUIRED  TO  CREATE  THE 
COMBIMAN  VISIBILITY  DATA  BASE  MEMBER  A7E-01 


/ /C3H V A*  JG8  HESS  00001000 

//JOBlIB  DO  DSN-C0M8IMAN.LCADL18*D1SP*SHR  00001100 

//C8MVM  EXEC  PGM-CBMVM  00001200 

//FT05F001  CD  DDNAME-SYS1N  0^001300 

//FTOoFOOl  00  S Y SCUT* A  0u001*00 

/ / FT07F CO  1  DO  SYSOUT-8  000J15C0 

/ / FT09F00 1  DO  DSN-COMB  I  MAN.  VI  SDAT  A,  UN  1T-0 1  S  K .  01  SP*  (  NE  » ,  CAT  LG  1  ,  -^001600 

//  V0L=SER»DISK01,SPACE»(240.2JCC).  00001610 

//  DC8*<8lKSIZE«240,LRECL-24C,RECFM-Pej  0o001o20 

//SYSUDUMP  OD  SYSOUT-A  000017C0 

//SYSIN  CD  *  GoGOleOO 

£  1  NT 

CACD  A7E-01  2  270.6  O.C  99.15  A  K  C  FS  8L  -L 

001WI NDSCREEN,  FRCNT  TOP  32 

22763  -56  A  12535 

22379  -551  12324  104 

22098  -546  12157  10* 

21693  -519  12059  104 

21579  -467  11876  104 

21314  -427  11735  103 

21109  -362  11616  Iu3 

20914  -261  11584  103 

20914  000  11564  103 

20914  281  11584  102 

21109  362  11616  102 

21314  427  11735  102 

21579  486  11876  102 

21893  519  12059  101 

22098  546  12157  101 

22379  551  12324  101 

22763  584  12535 

23000  578  12665  201 

23212  568  12784  201 

2344*  541  12903  201 

23731  470  13059  202 

23941  405  13173  202 

24109  292  13286  202 

24212  200  13341  202 

24212  000  13341  203 

24212  -200  13341  203 

24109  -292  13286  203 

23941  -405  13173  203 

23731  -470  13059  204 

2  3444  -  541  12  9  0  1  2  0  4 

23212  -568  12784  204 

23000  -578  12665 

002COCKPIT  CANOPY  CLEARLlNE  1  92 
29447  000  13550 

29404  247  1346C  301 

29361  622  13326  301 

29322  632  13201  301 

29261  1054  13024  302 

29209  1243  1286u  302 

29162  1378  127C0  302 

29114  1503  12557  302 

29067  1589  12415  303 

29002  1730  12238  jJ3 

28959  1805  12086  333 

2890  7  I860  11944  3  03 
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